عند تشغل eport تظهر رسالة

السلام عليكم

اذا كنت تستخدم الاصدار الرابع من برنامج التقارير فاعد تنزيلة مرة اخري سوف يعمل تمام إن شاء الله ،،

فلقد واجهتني هذه المشكلة مئات المرات

تحياتي لك

اذا سطبت البرنامج بالبكج اند ديبلويمنت فهناك خطوة ..علي ما اذكر الخطوة الخامسة او السادسة ..سيسألك فيها عن الملفات المرفقة فحمل الملفات اللازمة لقراءة التقارير

عزرا اخى الفاضل أنا سطبت البرنامج وأنا استخدم فجوال 5 وحزمة الست اب & دبلومنت الخاصة به ولم أضف أى ملفات خاصة بقراءة التقارير لأنى أساساً لا أعرفها الرجاء ارشادى لها لآن هذه المشكلت تؤرقنى جدا

vb 5 and 6 عندهم نفس الطريقة

بس حاول ضيف كل ملفات التقارير و هو تلقائيا حيضيف ملفات الocx الخاصة بالتقارير

بارك الله فيك يا اخ هشام على مساعدتك لى

انا فهمت منك ان احزم التقارير نفسها مع المشروع وهو يضيف ال OCX الخاص بها اوتوماتيكياً مع المشروع

السلام عليكم ورحمة الله وبركاته

يا شباب هذه المشكلة واجهتني كثير من قبل .. وسألت هنا ولم يجب علي أحد وحاولت أشوف الحل

في الأخير اكتشفت أن الحل تافه وهو أنك لم تجي تظهر التقرير لازم تكتب الكود الي يخلي الـ dataenvironment يجيب قاعدة البيانات من مجلد البرنامج .. لأن مسار البرنامج راح يتغير من كمبيوتر إلى آخر

نكتب هذا الكود قبل ما نظهر التقرير

DataEnvironment1.Connection1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path + "\lib.mdb" & ";Persist Security Info=False"

مع استبدال lib.mdb باسم قاعدة البايانات الخاصة بك

وبس :)

أخي الكريم كيف أضع الكود الذي تفضلت به هل في البداية أما بين الأسطر التالية

لكود الطباعة هذا علما بأن القاعدة الموجودة عندي محمية بكلمة مرور

هذا هو كود الطباعة

sql = "select *  From Table1 ORDER BY typ"
Set rs = db.Execute(sql)
Set DataReport2.DataSource = rs
DataReport2.Show
'DataReport2.PrintReport True

If rs.State = adStateOpen Then
Set rs = Nothing
End If