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

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

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

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط]
الدرس الثالث :
دراسة في الاداتين ADO & DataGrade



[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط]
مقدمة .::



درسنا في الدرس الماضي الأداة DATA وايضا الاداة MSFlexGride ...



بالنسبة لدرس اليوم فهو شبيه بالدرس الماضي من حيث الفكره ..


حيث أننا سنستخدم الاداة ADO للربط مع قاعدة البيانات والأداة DataGrade لعرض البيانات فيها ..



قبل البدء بالعمل علينا انشاء فورم تحتوي على الاشكال الظاهره أمامك ( وهو نفس المثال السابق ولكن بدون الاداتين (DATA وMSFlexGride )



[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]




بعد ذلك بالنقر على المفتاح CTRL+T ندرج الأداة التالية ::




[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]


شاهد بعدها الأداتين في شريط الادوات ::



[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]


نقوم بعدها بادراج الاداة Adodc على النموذج بالشكل التالي



[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]




بعدها نأتي لعملية الربط ...
هذه أسهل طريقة رأيتها لعملية الربط لهذه الاداة ..
هناك عدة طرق للربط لكن عليك بما هو امامك فهو ان شاء الله لن يحدث لك اي من المشاكل ..
بالزر الفأرة الايمن نصغط على الاداة Adodc ثم نختار Adodcproperties




[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]


سيظهر لك بعدها مربع الحوار التالي .::



[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
اختر مثل ما هو ظاهر امامك في الصورة ...



[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
بعد ذلك سيظهر لك مربع الحوار التالي :


[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]




حدد على القاعدة db1 ثم اضغط على OPEN بعد ذلك امسح المسار كاملاُ ..
فقط ابق على اسم القاعدة + الامتداد ..




[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]


ولله الحمد الان انتهينا من اتصال القاعدة بمشروعنا الان نربط الجدول وهي عن طريق ::



[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]

والان انتهينا من عملية الربط قاعدة البيانات بالمشروع ..
فقط تبقى لنا ان نظهر بيانات القاعدة على مربعات النص ..
شأنها شأن أداة Data في عملية الربط ..
تابع الصور :
لربط الرقم ..

ولربط الاسم

ولربط الراتب

ولرقم الجوال

وأخيراُ للملاحظات

وبعد ان انتهينا من عملية الربط ننفذ البرنامج لنتأكد من عملية الربط ..


الحمد لله البيانات جميعها ظهرت ..
والربط صحيح 100 % ..
الان نريد ان نتعامل مع مربعات الاوامر ليس مع الاداة Adodc كل ما علينا أن نكتب التعليمات البرمجية التاليه ..
ندرج الأداة بهذا الشكل ::.

الآن نربط الأداة DataGrade مع قاعدة البيانات حتى يتم عرضها في الجدول عن طريق الخاصية Datasource نربطها مع Adodc1

الان نأتي الى ما يميز هذه الأداة وهو خصائصها ..
أولا يجب أن نضيف ثلاثة حقول اضافيه على الشكل الافتراضي السابق حتى يصبح لدي خمس حقول وذلك عن طريق النقر بالزر الأيمن على الاداة DataGrade ومن ثم النقر على آخر خيار وهو ( Edit ) ، ثم انقر مرة أخرى بالزر الأيمن على الاداة لتشاهد امامك خيارات جديدة ..
نختار منها (Insert) ثلاث مرات لنضيف ثلاث حقول .. تابع الصور ..

وبما أننا أخترنا الأمر ( Edit ) فإنه بامكاننا التعديل على الجدول من حيث حجم ( المسافه بين الأعمدة بالسحب والافلات ) الحقل وماذا وكتابه العناوين للجدول من خلال الخصائص ووو ... ( كلها بدون أكواد برمجية ) ...تابع الصور ..


الأن نأتي لعرض بيانات قاعدة البيانات في الجدول ..::

والان بعد ان انتهينا من عملية الربط .. انقر موافق واخرج من هذه القائمه ..
ولكن هناك شي اود تنبيهك إليه ..


الان ننفذ البرنامج لنشاهد ما قمنا به ..



الان تقريباً أنتهينا من كل شيء ... فقط بقي علينا كتابة الأكواد ... وهي بسيطة جداً ..
ولكن قبل ذلك علينا إخفاء الأداة ADODC1 من خلال الخاصية Visible نجلها تساوي TRUE ..
حتى يكون البرنامج بشكل أجمل ...
الآن نكتب الأكواد ..
انشىء مثل هذه الأزرار ..
الأن نكتب مثل هذه الأكواد ..

DataInvironment و Data Report
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]



[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط]

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]



[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط]

وأخيراً انتهينا من عمل البرنامج .. الآن نطبق المشروع ونشاهد التقرير ::

** هذا الدرس الخامس والذي أخترت له عنوان :

الربط البرمجي دون استخدام أدوات & زيادات على التقارير & متفرقات .

_________________________________

* الربط البرمجي دون استخدام أدوات:

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


[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]

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

** قبل كل شي : أفتح مشروع جديد .. ثم قم بحفظه في نفس المجلد الذي توجد به قاعدة البيانات .
ثم ضع ثلاث مربعات نص ( للمتغيرات no_stud , name_stud , grade_stud )


_________________________________

* تعريف قاعدة البيانات والسجلات تحت التصريح عن المتغيرات :

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
* ربط قاعدة البيانات بالمتغير dbstud والجدول بالمتغير rsstud عند التحميل :

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
* إجراء عرض السجلات في أدوات النصوص :
يمكن تسمية عنوان الاجراء showfields عندئذ تكون التعليمة كالتالي :

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
* إجراء فتح ( إنشاء ) سجلات جديدة في قاعدة البيانات :
يمكن تسمية عنوان الإجراء openfields عندئذ تكون تعليمة الاجراء كالتالي :

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
مع مراعاة نوع البيانات المساندة للحقول حيث تضع VAL أمام الحقول الرقمية .
* استخدم Edit للتعديل ، وUpDate للحفظ .
* أمثلة على التعليمات البرمجية ::
أولاً ننشى مثل هذا الشكل :

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
بعد ذلك نأتي لكتابة التعليمات البرمجية :
* كود إضافة سجل جديد :

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
* كود حذف سجل :

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
* كود السجل الأول , الأخير , التالي , السابق .:

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
* وأخير الأكواد عدد السجلات , حفظ , تعديل .::

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
والآن انتهينا من كتابة الأكواد والربط .. لنشاهد العمل ::

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


_________________________________

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

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
نريد أن نجعلة على شكل جدول مسطر بحيث تكون مثل هذا الشكل ::

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]

الطريقة سهلة جداً ..
فقط نحدد باداة RtpLine جميع ما هو موجود في نموذج DataReport مثل هذا الشكل :

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
وهكذا مع بقية المربعات

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
والأن نشاهد ما قمنا به :: نفذ البرنامج وشاهد التقرير .::

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]

_________________________________

ولا زلنا في التقارير .. الآن نريد أن نطبع تقرير محدد لشخص معين وليكن بهذا الشكل ..

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]

الطريقة سهلة .. ولكن تابع معي جيداً ..
نذهب الى DataEnvironment ومن بعد ذلك ونقوم بعد ذلك باضافة أمر جديد ( Command2 ) كما تعلمنا سابقاً
وتصبح ببهذه الطريقة .

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
وبعدها ننقر بزر الفأره الايمن على command2 ونختار خصائص ، وبعدها نختار كما هو أمامك :

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
ثم انقر Apply ..
وحتى تتأكد من أنك تسير بالطريق الصحيح أذهب الى تبويب Parameters ونشاهد المتغير ( st ) فيه .

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
ثم موافق وتشاهد زر Command2 تحول الى هذا الشكل .::

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
الان بقى علينا أن ننشء شكل التقرير ..
نذهب من قائمة project نختار Add Data Report لندرج نموذج جديد للتقرير ..
شاهد كيف أصبح شكل متصفح المشروع :

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]


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


[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
الآن كل شي سهل ..
فقط عليك تنسيق الشكل وكتابة ما تريد .. او شاهد الصور أمامك ::

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
والان انتهينا من صفحة التقرير ..
ما علينا سوى الذهاب إلى الصفحة الرئيسية للبرنامج وننشء زر جديد وليكن اسمه ( تقرير السجل الحالي ) .::
ونضع بع الكود التالي ::

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
الان نطبق المشروع .. وتصفح قاعدة البيانات .. ولمشاهدة التقرير الحالي انقر على ( تقرير السجل الحالي )
لتشاهد هذا الشكل :

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
ولله الحمد والمنه ..
انتهينا من عمل التقارير ..


_________________________________

الان هناك عدة أمور متفرقة .::
منها اضافات من عندي .ومنها اجابة على بعض استفسارات الأعضاء جمعتها لكم كالتالي :
- لاضافة التاريخ والوقت ..
سأل أحد الأعضاء في موضوع سابق عن كيفية إدراج التاريخ والوقت في قاعدة البيانات تلقائيا .. من دون تدخل من المستخدم هل هذا ممكن ؟
نعم هذا ممكن ، أضف مربعين نص .. ولك الحرية في اظهارهم أمام المستخدم أو لا ..
ولا تنسى أن تضيف حقلين في قاعدة البيانات للتاريخ والوقت .
وللقيام بهذه العملية اتبع الاتي :
نقوم أولا بادراج أداة timer باي مكان بالنموذج

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
ولا تنسى أن تحدد في خصائص Timer بأن تضع ::

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
بحيث يتحرك كل ثانية ( لآن وحدة القياس هنا بالملي ثانية ) ..
والان نكتب في التايمر هذا الكود ::

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


[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط]


اذا كان لديك أكثر من جدول بقاعدة البيانات ..وتريد عرضهم في أحد الاداتين MSFlexGride أو DataGrade في هذه الحالة هناك عدة طرق ..
نذكر أحدها وهي : إنشاء جدول استعلام ونضع به جميع ( أو بعض ) الحقول من الجداول حسب المطلوب ..
ثم نربط جدول الاستعلام بالاداة ..

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط]
** نقطة أخرى وهي :
لمن يريد أن يدرج قائمة في المشروع ..
والقائمة تسحب بياناتها من قاعدة البيانات ..
فالحل بسيط جداً ..
أولا هناك أداة سوف تستخدم في هذا المجال وهي :(Microsoft Datalist control 6 (sp6 نقوم بادراجها :
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
حتى تظهر لك بشريط الأدوات بهذا الشكل :

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]

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

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