وليد الشهري

السلام عليكم ..

باختصار شديد ...

لإنشاء تقرير انقر على Ctrl+T ثم اذهب للتبويب Designers تأكد من وضع علامة صح أمام كل من :
1- Data Environment
2- Data Report
ثم انقر على Ok
اذهب إلى القائمة Project ثم انقر على Data Environment Add
* ملاحظة إذا لم يتم العثور على Data Environment Add في القائمة Project فستجدها في القائمة Project ثم More ActiveX Designers ثم Data Environment
ستظهر لك نافذة توجد فيها شجرة توجد فيها Connection1 غير اسمه إلى MyDataSource
انقر على MyDataSource بالزر الأيمن ثم اختار Properties
سوف تظهر لك النافذة Data Link Properties اختر الخيار Microsoft Jet 3.51 OLE DB Provider
لتحديد مزود قاعدة البيانات الذي سوف تستخدمه وهذا الخيار إذا كانت قاعدة البيانات الخاصة بك قاعدة بيانات أكسس 97
اذهب إلى صفحة التبويب Connection وقم بتحديد قاعدة البيانات الخاصة بك
* ملاحظة : إذا كنت تريد ملف قاعدة البيانات في نفس مجلد البرنامج اكتب اسم الملف وامتداده فقط بحيث يكون الملف في نفس مجلد التطبيق مثل MyData.Mdb
انقر على Test Connection للتأكد من سلامة الاتصال ثم انقر Ok لإغلاق نافذة Data Link Properties في حالة عدم وجود أخطاء
أحفظ المشروع بحيث سيحفظ الملف باسم DataEnvironment1.Dsr
انقر بالزر الأيمن على الشجر اختر الأمر Add Command سيتم إضافة Command سمه MyDataMember انقر بالزر الأيمن على MyDataMember واختر الأمر Properties ستظهر لك نافذة الخصائص Command1 اختار التبويب General ضع الاسم MyDataMember في Command Name وحدد Connection
من القائمة المركبة DataBase ****** اختر كائن قاعدة البيانات Table (جدول)
ومن القائمة المركبة ****** Name اختر اسم الكائن
انقر الآن على Ok
سوف تظهر لك في الشجرة بيانات الأمر MyDataMember وسوف ترى قائمة من الأعمدة في الجدول
..
الآن اذهب للقائمة ****** ثم Add Data Report سوف يظهر لك نافذة تصميم التقرير وهي تحتوي على :
* رأس التقرير Report Header
* رأس الصفحة Page Header
* التفصيل Detail
* تذليل الصفحة Page Footer
* تذليل التقرير Report Footer

اذهب إلى نافذة الخصائص الخاصة بالتقرير DataReport1 وقم بتعديل ما يلي :
- الخاصية DataSource (مصدر البيانات) إلى MyDataSource
- الخاصية DataMember (عضو البيانات) إلى MyDataMember
انقر بالزر الأيمن في أي مكان على تصميم التقرير ثم اختر Retrieve Structure (إعادة بناء التصميم) وذلك لأجل تخصيص المقاطع في التقرير بحيث تكون متوافقة , سوف يتم إنذارك بأن جميع الأدوات سيتم حذفها انقر على Yes للاستمرار.
ستلاحظ أن الأدوات قد تغيرت حيث تم إضافة مقبض جديد باسم Data Report
وقد تم إضافة أدوات جدد يمكنك ربطها بالسجلات عن طريق الأمرين DataMember و DataField
يمكنك تصميم التقرير حسب رغبتك
بعد ذلك يعتبر الكائن DataReport1 كنافذة
لاستدعائها
DataReport1.Show
لطباعة التقرير
DataReport1.PrintReport True
لتصدير التقرير
PrintReport.ExportReport rptKeyHTML,,,True

AlAmRi

سلام عليكم

شكرا لك استاذ وليد

ابداع وابداع

كلمني معيوف عنك وقال انك مبرمج

فرحت والله وقلت الحمد لله فيه مبرمج بيننا

وان شاء الله انك تطور مهاراتي

لأني لسى مبتدي ......... وابي اتعلم

راح اراقب دروسك بأنتظام

شكرا لك

__________________

[فقط الأعضاء المسجلين والمفعلين يمكنهم رؤية الوصلات . إضغط هنا للتسجيل]

bb-aa@w.cn

اخوي وليد انت دأم مفد الله يعطك العافية