اغلب المبرمجون المبتدئين يستخدمون الربط التقليدى عبر الادوات فى إنشاء التقارير بــ Datareport ليس من سهولته وإنما لعدم معرفة طرق الربط عن طريق الكود التى تعد اقوى واسرع وذات نتائج حقيقية
اليوم سوف تتعلمون كيفية إنشاء التقرير بالكود البرمجى adodb
وقل وداعا للربط التقليدى :p:p
إذهب الى قائمة Project وإختار References
ثم حدد مكتبة Microsoft ActiveX Data Obiects 2.7 Libray
استخدام الـــ Label
هنا تم تغيير شكل الليبل وعمل اطار له من خاصية BorderStyle ---->> 1 - rptBSSolid
وكذلك تسميته من خلال خاصية الـ Caption كما هو موضح بالشكل
ارسم الشكل التالى :
استخدام الـــ Text
ايضاً قم بتغيير اطار التكست من خاصية BorderStyle ---->> 1 - rptBSSolid
من خاصية Datafiled اكب اسم الحقل
ناتى للاكواد :
فى فسم التصريحات General
PHP كود :
Dim db As New ADODB.Connection
Dim rs As New ADODB.Recordset
فى حدث الـــ Form_Load()
PHP كود :
If db.State = 1 Then db.Close
db.CursorLocation = adUseClient
db.Provider = "Microsoft.Jet.OLEDB.4.0;"
db.Open App.Path & "\vb4arb.mdb"
اما فى كوماند القرير Command1_Click()
PHP كود :
If rs.State = adStateOpen Then rs.Close
rs.Open "select*from Tabel1", db, adOpenStatic, adLockPessimistic
Set DataReport1.DataSource = rs
DataReport1.Show
فتح الجدول
اسناد القيم او البيانات من المتغير rs الى التقرير
عرض التقرير
والان انظر للتقرير
تنبيه : تم زيادة حقل للتاريخهذه البيانات افتراضية لكى لايزعل منى احد
وفى النهاية: ارجو ان اكون قد وفقت فى الشرح
الصور والمثال بالمرفقات.....
سبحان الله وبحمده سبحان الله العظيم
آللهم لگ آلحمد حتى ترضى .. ولگ آلحمد إذا رضيِت .. ولگ آلحمد بعد آلرضآ
آللهم لگ آلحمد حتى ترضى .. ولگ آلحمد إذا رضيِت .. ولگ آلحمد بعد آلرضآ