إنشاء التقارير بوااسطة داتا ريبورت

بسم الله الرحمن الرحيم نبدأ .

أولاً - مدخل إلى الدرس :

كل من قام بتصميم برنامج قواعد بيانات بسيطاً كان أم معقداً فلا بد و أنه فكر
في إضافة ميزة الطباعة لبرنامجه و التي تعد من أهم الميزات في كل البرامج .
و لعمل أمر طباعة إحترافي و مع ميزة عرض قبل الطباعة فأنت إذاً سوف تحتاج
إلى أداة رائعة تأتي مع فيجوال بيسك و هي data report

ثانياً - بداية إنشاء داتا ريبورت :

إذا كنت قد قررت إنشاء تقاريرك بواسطة داتا ريبورت فالأمر سهل جداً و ما يحتاج تعقيد .
أنا راح أحاول أشرح شرح مبسط أوكي ..
بعد تجهيز قاعدة البيانات المراد العمل بها و معرفة المشروع ننفذ الخطوات التالية
و على سبيل المثال سوف نأخذ برنامج دليل الهاتف الذي صممناه منذ مدة ... حتى نطوره
و نجعله يطبع نتائج البحث .
من القائمة project >>>>
more activx designers >>>
data enviroment
فتظهر لنا نافذة جديدة ....
ننقر بها على الرمز connection1 بالزر الأيمن ثم نختار properties
ثم نحدد النمط
microsoft jet 4.0 ole db provider
و من التبويب الثاني نحدد إسم قاعدة البيانات
ثم نضغط على الامر test ((إختبار الاتصال ))
و سوف يعطينا رسالة بنجاح الاتصال نضغط موافق ثم موفق ...
فنعود مرة أخرى إلى واجهة data enviroment الرئيسية
نضغط مرة اخرى على connection1 باليمين و نختار
add command
ثم نضغط على command1 باليمين و نختار properties
نفعل على الخيار
SQL statement
و نكتب في المربع السفلي أي عبارة sql مثلاً

رمز برمجي:


select * from mok

ثم نختار موافق .... فنلاحظ أن الحقول الموجودة بالجدول المحدد قد أدرجت ... و هنا
نكون قد تجاوزنا القسم الأول و الصعب نسبياً . مبروووووك

ثالثاً - إنشاء التقرير :

بعد أن حققنا الربط مع قاعدة البيانات نختار من القائمة project الأمر
add data report
فنلاحظ ان التقرير مقسم إلى خمس أقسام
الأول - report header
رأس التقرير ... و فيه تكتب العبارة التي سوف تظهر في رأس أول صفحة من تقريرك مثلاً اسم شركتك مثلاً : المختار للبرمجة طبعاً بواسطة أداة الليبل
الخاصة بالتقرير .. و سوف تلاحظ وجودها بمربع الأدوات عند وجودك ضمن التقرير
الثاني - page header
رأس الصفحة ..... و هي العبارة التي تظهر في رأس كل صفحات التقرير تكتب فيها مثلاً .
تقرير بنتائج البحث .
الثالث - detail
و هو الأهم و سوف نتكلم عنه آخر شي.
الرابع Page footer
تذبيل الصفحات
الخامس report footer
تذبيل التقرير

.... الأهم الآن ماذا نفعل في القسم الثالث detail
و ببساطة شديدة نفتح واجهة data enviroment ثم نفتح connection1 ثم command1
ثم نحدد الحقل الأول مثلاً (( الاسم )) و نسحبة إلى ان نصل به إلى القسم الثالث ثم نقوم بإفلاته
و نعمل نفس الشيء مع بقية الحقول .... ثم نقوم بتنسيق التقرير .. على ذوقنا.

رابعاً - إظهار التقرير :

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

خامساً - التقرير الحي :

إلى الآن فمن المفترض أنك قد قمت بإنشاء تقرير رائع ....
و لكن ألا تلاحظ ان تقرير يعرض كل السجلات ...
و المطلوب منه هو ان يعرض السجلات التي قمنا بالبحث عنها فقط .. أليس كذلك ..
الآن سوف نتعلم كيف نجعل التقرير مرتبط بجملة SQL
إذا كنت قد لاحظت سير الدرس فلا بد و انك قد انبهت ان التقرير قد ارتبط بقاعدة البيانات عن طريق
data environment و ببساطة لتطبيق استعلام على التقرير يكفي تطبيقه على الـ data environment
و لتطبيق الاستعلام عليها نضيف الكود التالي إلى كود البحث .

رمز برمجي:


With DataEnvironment1
.Commands(1).CommandType = adCmdText
.Commands(1).CommandText = "هنا ضع جملة الاستعلام "
.Commands(1).Execute
If .rsCommand1.State = 1 Then
.rsCommand1.Close
End If
End With


ملاحظة :
لابد أن تحدد في خصائص الداتا ريبورت أمرين هما

الاول datasource: DataEnvironment1

والثاني:datamember:Command1

واذا تم ذلك مع سحب الحقول سوف تظهر له النتيجة صحيحة

ملاحظات عامة :
للفهم الأكبر يجب متابعة الدرس بالتسلسل الموجود عليه ...
و التطبيق العملي خير وسيلة للتعلم ....
و تذكر أنه إذا لم تخطأ فإنك لن تصيب ....
أرجوا أن يكون هذا الدرس من الصدقات الجارية و من العلم الذي ينتفع به ..
كما أرجو من الله تعالى أن لا تنسوني من دعوة صالحة في ظهر الغيب