الدرس الخامس: الموديول والربط بقاعدة البيانات

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

كما سنضيف في هذا الدرس سوف نقوم باضافة المكتبات اللازمة للتعامل مع قاعدة البيانات .

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

من قائمة Project اختر Refernces ... ستظهر لك شاشة المكتبات المتوفرة ... لاحظ وجود أربع مكتبات افتراضية للفيجوال بيسك .
الآن ابحث عن المكتبة التالية :
Microsoft Dao 3.6 Object Library
أو أي اصدار أحدث - أو أقدم في حالة عدم وجوده - .
كما في الشكل التالي :

والآن لكي تعرف الطرق Methods والخصائص Properties التي تحتويها هذه المكتبة - أو غيرها - قم بالضغط على زر F2 ومن القائمة العلوية اختر Dao وانظر إلى القائمتين في الأسفل .
تحتوي القائمة اليسرى على المفاتيح الرئيسية لهذه المكتبة ، فيما تحتوي القائمة اليمنى على المفاتيح الفرعية .

والآن لنتعرف على إحدى طرق الحصول على بعض المعلومات او بارميترات Paremeters للدوال والإجراءات المختلفة ، وبفرض أنني أريد أن أعرف أمر انشاء قاعدة بيانات جديدة ، فكل ما عليك هو كتابة كلمة ذات دلالة في مربع البحث أعلاه ولتكن مثلاً Create ستلاحظ ظهور قائمة من نتائج البحث ومنها مثلاً CreateDatabase والتي بمجرد النقر عليها سوف ترشدنا إلى البارميترات المطلوبة لهذه الدالة . أيضاً يمكنك تدقيق نتائج البحث من خلال اختيار DAO من قائمة المكتبات أعلى مربع البحث .

لاحقاً يمكنك البحث عن هذه الدالة فقط ومعرفة كل شيء عنها من مكتبة MSDN مثلاً ... بدل البحث في كل ما يتعلق بقواعد البيانات .

يعد الموديول أو الملف البرمجي وحدة برمجية عامة Public بحيث نستطيع الوصول إلى الدوال الموجودة فيها من أي مكان في البرنامج ، كما أننا يمكننا تعريف دالة Main بداخله بحيث تنفذ الأوامر الموجودة بداخلها قبل البدء في البرنامج .

لإنشاء Module اضغط على أي فورم بزر الماوس الأيمن ... اختر New ومن ثم Module .
ستظهر شاشة لكتابة الأكواد ... هذه هي كل محتويات Module .

عادة ما نبدأ في الموديول بانشاء اجراء بهذا الشكل :

Public Sub Main()

End Sub

ومن ثم ومن قائمة project - Project properties قم بالبحث عن StartUp Object والتي تحتوي على أول فورم سيتم البدء به ... اختر SubMain وبذلك تكون الدالة التي قمنا بإنشاءها هي الأولى في التنفيذ .

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

Public D1 As Database
Public D2 As Database

كذلك نحتاج خمسة جداول ... لجدول البضائع ، المسوقين ، الأنواع ، واثنين آخرين لنتائج الاستعلام وما شابه ذلك ، وذلك بالشكل التالي :

Public T1 As Recordset
Public T2 As Recordset
Public T3 As Recordset
Public T4 As Recordset
Public T5 As Recordset

===================================
بالامكان - بل المفترض - الاستغناء عن هذا الموضوع بتعريف المتغيرات فقط عند الحاجة إليها ، واغلاق قاعدة البيانات فيما عدا ذلك ، كما يمكن ايضاً فتح قاعدة البيانات والجداول دائماً للتسهيل في التعامل برغم أن هذا قد يسبب ثقلاً كبيراً على النظام ، ولكن هذه هي الطريقة التي قمت بها في الدورة السابقة للعمل مع قواعد البيانات .
===================================