الى مصممى التقارير بالكريستال :كيف يمكن التغلب على هذه المشكلة؟

حتى يكتمل وصف المشكله.. أحب أن أضيف الملاحظة التاليه:

عندما أقوم بحذف كلمة المرور الموجوده على قاعدة البيانات عن طريق برنامج Access 200, لا أجد أى مشكله فى عرض التقرير أثناء تشغيل برنامجى 00 وذلك طبعا بعد أن أعدل كود الربط بقاعدة البيانات داخل مشروع برنامجى على أساس أنها غير محمية بكلمة مرور

السلام عليكم

انا شخصيا لم توجهني هذه المشكلة من قبل ولكن سوال هل غيرت مسار قاعدة البيانات ؟

اذا كان نعم يجب ان تعدل موقع قاعدة البيانات في التقرير ، وذلك باتباع الخطوات التالية

DataBase --> set Location

وتحدد جميع الجداول ومن تم تضغط على زر Same DataBase

عموما انا اكتب الان ليس من جعازي والجهاز الذي اشتغل عليه حاليا لا يوجد به كريستل ريبورت المهم الخطوات قريبة جدا من الحل

ادا لم تفلح هده الطريقة اخبرنا وساجد لك الحل ان شاء الله

وفي الختام انا اسف جدا لتاخري في الرد عليك

لك تحياتي

أخى العزيز/ طارق موسى

شكرا لك

أفيدك أننى لم أغير مسار قاعدة البيانات , ودائما أتأكد من صحته عن طريق شاشة DataBase --> set Location

وللعلم أيضا:

عندما أفتح التقرير فى شاشة تصميم التقارير فى الكريستال ,

وأستخدم DataBase --> Verify Database تظهر شاشة إدخال كلمة المرور( Microsoft Access Password ) فأقوم بإدخال كلمة المرور صح وأتأكد من حالة حروفها (كبيرةأو صغيرة حسب ما أنشأتها) وعندما أضغك زر OK تظهر نفس الرسالة :

Error Opening File.

File could not be opened: "Tablename", at file location: "Tablename"

مرفق ملف به مشروع برنامج صغير يوضح المشكلة عمليا

ملاحظة: كلمة المرور لقاعدة البيانات المحمية هى ddd

myproblem.zip

لقد قمت بانزال الملف ساحاول المساعدة ان شاء الله تعالى

لك تحياتي

أخى الكريم/ طارق موسى

تقبل شكرى على إهتمامك وفى إنتظار رأيك

انا لم اقم بفتح الملف

ولكن لكي يتم عرض تقرير من قاعدة بيانات عليها كلمة مرورنكتب الكود التالي

cr.connect=";pwd=123"

cr.action=1

حيث cr هي اداة كريستل الخاصة بك

123 هي كلمة المرور على قاعدة البيانات

ادا لم تنجح العملية اكتب كلمة المرور بين علامتي تنصيص ( ' )

اتمنى ان يكون هذا هو مطلبك

لك تحياتي

أخى الفاضل / طارق موسى

مرة أخرى أشكرك .. ولقد وصلنى هذا الكود من أحد أعضاء منتدى الفيجوال بيسك 00 وجربته ونجح فى فتح قاعدة الملفات

With cr
    CrystalReport1.LogonInfo(0) = "dsn=;uid=;pwd=ddd;dsq="
    CrystalReport1.DataFiles(0) = App.Path & "MyDabase.mdb"
    CrystalReport1.ReportFileName = App.Path & "MyReport.rpt"
    CrystalReport1.Action = 1
End With