سلسلة دروس الفيجوال بيسك في قواعد البيانات -الدرس الخامس-

[center][u][color=#006600]الخامس والذي أخترت له عنوان :

[/color][size=21][color=#cc0000]الربط البرمجي دون استخدام أدوات & زيادات على التقارير & متفرقات .[/color][/size][/u]

[b][i][color=#0000ff]_________________________________[/color][/i][/b]

[size=16][color=#ff0000]*[u] الربط البرمجي دون استخدام أدوات:[/u][/color][/size]

أولا يجب التأكد من اختيار أحد النسخ من [color=#006600]DAO [/color]وهي أختصار لـ ( [color=#006600]Data Access Object[/color])
قبل البدء بعملية الربط وذلك يتم باختيار من القائمة [color=#006600]Project [/color]ثم [color=#006600]Referces [/color]بعد ذلك تختار أحدث النسخ مثل [color=#006600][u]Microsoft ADO 6 object library [/u][/color]ثم موافق .


[img]http://www.members.lycos.co.uk/juvevip/a5/1.gif[/img]

كما أننا نفترض أن لدينا قاعدة بيانات منشأة في [color=#006600]Access [/color]أو داخل [color=#006600]VisualBasic [/color]، ومثال على ذلك : نفترض أن قاعدة بيانات منشأة على المسار التالي [color=#006600]c:\datastudent.mdb[/color] وتحتوي على جدول باسم [color=#006600]tablestud [/color]، وبهذا الجدول ثلاثة حقول هي :[color=#006600]no_stud , name_stud , grade_stud[/color] .

[size=16][color=#ff0000][u]** قبل كل شي :[/u][/color][/size] أفتح مشروع جديد .. ثم قم بحفظه في نفس المجلد الذي توجد به قاعدة البيانات .
ثم ضع ثلاث مربعات نص ( للمتغيرات no_stud , name_stud , grade_stud )


[b][i][color=#0000ff]_________________________________[/color][/i][/b]

[size=16][color=#ff0000][u]* تعريف قاعدة البيانات والسجلات تحت التصريح عن المتغيرات :[/u][/color][/size]

[img]http://www.members.lycos.co.uk/juvevip/a5/2.gif[/img]
[color=#ff0000][u]* ربط قاعدة البيانات بالمتغير dbstud والجدول بالمتغير rsstud عند التحميل :[/u][/color]

[img]http://www.members.lycos.co.uk/juvevip/a5/3.gif[/img]
[color=#ff0000][u]* إجراء عرض السجلات في أدوات النصوص :[/u][/color]
يمكن تسمية عنوان الاجراء [color=#006600]showfields [/color]عندئذ تكون التعليمة كالتالي :

[img]http://www.members.lycos.co.uk/juvevip/a5/4.gif[/img]
[color=#ff0000][u]* إجراء فتح ( إنشاء ) سجلات جديدة في قاعدة البيانات :[/u][/color]
يمكن تسمية عنوان الإجراء [color=#006600]openfields [/color]عندئذ تكون تعليمة الاجراء كالتالي :

[img]http://www.members.lycos.co.uk/juvevip/a5/5.gif[/img]
مع مراعاة نوع البيانات المساندة للحقول حيث تضع [color=#ff3300][u]VAL [/u][/color]أمام الحقول الرقمية .
[color=#ff0000][u]* استخدم [color=#0000cc]Edit [/color]للتعديل ، و[color=#0000cc]UpDate [/color]للحفظ .[/u][/color]
[size=16][color=#ff0000][u]* أمثلة على التعليمات البرمجية ::[/u][/color][/size]
أولاً ننشى مثل هذا الشكل :

[img]http://www.members.lycos.co.uk/juvevip/a5/6.gif[/img]
بعد ذلك نأتي لكتابة التعليمات البرمجية :
[color=#ff0000][u]* كود إضافة سجل جديد :[/u][/color]

[img]http://www.members.lycos.co.uk/juvevip/a5/7.gif[/img]
[color=#ff0000][u]* كود حذف سجل :[/u][/color]

[img]http://www.members.lycos.co.uk/juvevip/a5/8.gif[/img]
[color=#ff0000][u]* كود السجل الأول , الأخير , التالي , السابق .:[/u][/color]

[img]http://www.members.lycos.co.uk/juvevip/a5/9.gif[/img]
[color=#ff0000][u]* وأخير الأكواد عدد السجلات , حفظ , تعديل .::[/u][/color]

[img]http://www.members.lycos.co.uk/juvevip/a5/10.gif[/img]
والآن انتهينا من كتابة الأكواد والربط .. لنشاهد العمل ::

[img]http://www.members.lycos.co.uk/juvevip/a5/11.gif[/img]
الحمد لله انتهينا من هذا العمل ..
ومن لدية أي مشكلة أو استفسار فأنا في الخدمة ..
وهذا العمل لمن يريد تحميله : [url=http://www.members.lycos.co.uk/juvevip/a5/prog.rar][color=#194aa0][u]من هنا[/u][/color][/url]


[b][i][color=#0000ff]_________________________________[/color][/i][/b]

شاهدنا في اعمل التقرير الماضي هذا الشكل .:

[img]http://www.members.lycos.co.uk/juvevip/a5/12.gif[/img]
نريد أن نجعلة على شكل جدول مسطر بحيث تكون مثل هذا الشكل ::

[img]http://www.members.lycos.co.uk/juvevip/a5/15.gif[/img]

الطريقة سهلة جداً ..
فقط نحدد باداة [color=#006600]RtpLine [/color]جميع ما هو موجود في نموذج [color=#006600]DataReport [/color]مثل هذا الشكل :

[img]http://www.members.lycos.co.uk/juvevip/a5/13.gif[/img]
[b]وهكذا مع بقية المربعات [/b]

[img]http://www.members.lycos.co.uk/juvevip/a5/14.gif[/img]
والأن نشاهد ما قمنا به :: نفذ البرنامج وشاهد التقرير .::

[img]http://www.members.lycos.co.uk/juvevip/a5/15.gif[/img]

[b][i][color=#0000ff]_________________________________[/color][/i][/b]
[/center]
[center]ولا زلنا في التقارير .. الآن نريد أن نطبع تقرير محدد لشخص معين وليكن بهذا الشكل ..[/center]
[center][img]http://www.members.lycos.co.uk/juvevip/a5/26.gif[/img]

الطريقة سهلة .. ولكن تابع معي جيداً ..
نذهب الى [color=#006600]DataEnvironment [/color]ومن بعد ذلك ونقوم بعد ذلك باضافة أمر جديد ( [color=#006600][u]Command2 [/u][/color]) كما تعلمنا سابقاً
وتصبح ببهذه الطريقة .

[img]http://www.members.lycos.co.uk/juvevip/a5/16.gif[/img]
وبعدها ننقر بزر الفأره الايمن على [color=#006600]command2 [/color]ونختار خصائص ، وبعدها نختار كما هو أمامك :

[img]http://www.members.lycos.co.uk/juvevip/a5/17.gif[/img]
ثم انقر [color=#006600]Apply [/color]..
وحتى تتأكد من أنك تسير بالطريق الصحيح أذهب الى تبويب [color=#006600]Parameters [/color]ونشاهد المتغير ( [color=#006600][u]st [/u][/color]) فيه .

[img]http://www.members.lycos.co.uk/juvevip/a5/18.gif[/img]
ثم موافق وتشاهد زر [color=#006600][u]Command2 [/u][/color]تحول الى هذا الشكل .::

[img]http://www.members.lycos.co.uk/juvevip/a5/19.gif[/img]
الان بقى علينا أن ننشء شكل التقرير ..
نذهب من قائمة [color=#006600]project [/color]نختار [color=#006600]Add Data Report[/color] لندرج نموذج جديد للتقرير ..
شاهد كيف أصبح شكل متصفح المشروع :

[img]http://www.members.lycos.co.uk/juvevip/a5/20.gif[/img]


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


[img]http://www.members.lycos.co.uk/juvevip/a5/21.gif[/img]
الآن كل شي سهل ..
فقط عليك تنسيق الشكل وكتابة ما تريد .. او شاهد الصور أمامك ::

[img]http://www.members.lycos.co.uk/juvevip/a5/22.gif[/img]
[img]http://www.members.lycos.co.uk/juvevip/a5/23.gif[/img]
[img]http://www.members.lycos.co.uk/juvevip/a5/24.gif[/img]
والان انتهينا من صفحة التقرير ..
ما علينا سوى الذهاب إلى الصفحة الرئيسية للبرنامج وننشء زر جديد وليكن اسمه ( تقرير السجل الحالي ) .::
ونضع بع الكود التالي ::

[img]http://www.members.lycos.co.uk/juvevip/a5/25.gif[/img]
الان نطبق المشروع .. وتصفح قاعدة البيانات .. ولمشاهدة التقرير الحالي انقر على ( تقرير السجل الحالي )
لتشاهد هذا الشكل :

[img]http://www.members.lycos.co.uk/juvevip/a5/26.gif[/img]
ولله الحمد والمنه ..
انتهينا من عمل التقارير ..


[b][i][color=#0000ff]_________________________________[/color][/i][/b]

[size=16][color=#ff0000][u]الان هناك عدة أمور متفرقة .::[/u][/color][/size]
منها اضافات من عندي .ومنها اجابة على بعض استفسارات الأعضاء جمعتها لكم كالتالي :
[color=#ff0000][u]- لاضافة التاريخ والوقت .. [/u][/color]
سأل أحد الأعضاء في موضوع سابق عن كيفية إدراج التاريخ والوقت في قاعدة البيانات تلقائيا .. من دون تدخل من المستخدم هل هذا ممكن ؟
نعم هذا ممكن ، أضف مربعين نص .. ولك الحرية في اظهارهم أمام المستخدم أو لا ..
ولا تنسى أن تضيف حقلين في قاعدة البيانات للتاريخ والوقت .
وللقيام بهذه العملية اتبع الاتي :
نقوم أولا بادراج أداة [color=#ff3300][u]timer [/u][/color]باي مكان بالنموذج

[img]http://www.members.lycos.co.uk/juvevip/a5/27.gif[/img]
ولا تنسى أن تحدد في خصائص [color=#ff3300]Timer [/color]بأن تضع ::

[img]http://www.members.lycos.co.uk/juvevip/a5/28.gif[/img]
بحيث يتحرك كل ثانية ( [color=#3300cc][u]لآن وحدة القياس هنا بالملي ثانية[/u] [/color]) ..
والان نكتب في التايمر هذا الكود ::

الان نفذ المشروع وستشاهد التاريخ والوقت ( [color=#ff0000]متحرك [/color]) ..
وبمجرد أن تضغط على حفظ فإنه يتم ادراج التاريخ والوقت الحالي بقاعدة البيانات ...


[url=http://forum.kooora.com/user.aspx?id=57093&f=glitzerdivider_gold3.gif][b][i][color=#0000ff]_________________________________[/color][/i][/b][/url]


اذا كان لديك[color=#3333cc][u] أكثر من جدول [/u][/color]بقاعدة البيانات ..وتريد عرضهم في أحد الاداتين [color=#ff0000]MSFlexGride [/color]أو [color=#ff0000]DataGrade [/color]في هذه الحالة هناك عدة طرق ..
نذكر أحدها وهي : إنشاء جدول استعلام ونضع به جميع ( أو بعض ) الحقول من الجداول حسب المطلوب ..
ثم نربط جدول الاستعلام بالاداة ..

[url=http://forum.kooora.com/user.aspx?id=57093&f=glitzerdivider_gold3.gif][b][i][color=#0000ff]_________________________________[/color][/i][/b][/url]
[size=16][color=#ff0000][u]** نقطة أخرى وهي :[/u][/color][/size]
لمن يريد أن يدرج قائمة في المشروع ..
والقائمة تسحب بياناتها من قاعدة البيانات ..
فالحل بسيط جداً ..
أولا هناك أداة سوف تستخدم في هذا المجال وهي :[color=#0000cc](Microsoft Datalist control 6 (sp6[/color] نقوم بادراجها :
[img]http://www.members.lycos.co.uk/juvevip/a5/30.gif[/img]
حتى تظهر لك بشريط الأدوات بهذا الشكل :

[img]http://www.members.lycos.co.uk/juvevip/a5/31.gif[/img]

[b]ومن أهم الخصائص في هذه الآداة ..[/b]

[b][u][color=red]Row Source : [/color][/u][/b]
[b]اذا كان لديك جدولين مثلاً .. وتريد أن تعرض بيانات من جدول أخر ( مثلا تعرض الاسم )[/b]
[b]وتخرن البيانات الجديدة في جدول جديد ( مثلاً كود للاسم ) ..[/b]
[b]فهذه الخاصية خاصة بالعرض الاسماء فقط .[/b]
[b][u][color=red]list Field[/color][/u][/b]
[b]اسم الحقل في الجدول الأول ( الذي يحتوي على الاسم ).[/b]
[b][color=red][u]Data Source[/u][/color][/b]
[b]مكان الحفظ الجديد وتحدد فيه على الاداة التي تحتوي على الجدول الذي سنحفظ فيه البيانات الجديدة.[/b]
[b][u][color=red]Data Field[/color][/u][/b]
[b]الحقل من الجدول الثاني ..[/b]
[b]وأخيراً ..::[/b]
[b][color=red][u]Bound Column [/u][/color][/b]
[b]وهذا مثلاً اذا أردت أن تربط مربع نص بأداة الكمبو ، فان البيانات التي ستظهر في مربع النص[/b]
[b]هي التي تحددها من هذه الخاصية ..::[/b][/center]