ربط قاعدة بيانات بالبرنامج

ربط قاعدة بيانات بالبرنامج

قبل أن نبدأ بأي شيء أحب أن أذكر أنه عليك أن تتابع دروس قواعد البيانات خطوة بخطوة . فإذا قرأت درساً دون الدرس الذي قبله فلن تفهمه.!

أرجو التعاون والتركيز فقواعد البيانات من أهم شيء إذا كنت ترغب في عمل برنامج فعلي



ربما رأيت الكثير من البرامج التي تحوي جداول كثيرة مثل دليل الهاتف ! هل فكرت كيف تعرض هذه السجلات في برنامج الدليل ؟

وهل فكرت كيف يتم إضافة سجل إلى الجدول. أو كيفية البحث عن سجل محدد من بين ألاف السجلات؟

هذا كله عن طريق قواعد البيانات DataBase من إسمها يدل على أنها عبارة عن مكان أو قاعدة تحتوي على بيانات

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



إن التعامل مع قواعد البيانات ليس صعباً وليس سهلاً جداً . ولاكن تابع دروسنا وإنشاء الله سوف تتعلم التعامل مع قواعد البيانات على أكمل وجه.



في البداية . كيف تنشىء قاعدة بيانات:

هذه ليست بمشكلة . عن طريق برنامج Microsoft Access

إفتح البرنامج قم إختر قاعدة بيانات جديدة من قائمة ملف. ثم إختر قاعدة بيانات فارغة

بعد ذلك سوف يظهر مربع حوار لحفظ قاعدة البيانات . قم بإنشاء مجلد جديد لنفرض إسمه "MyTell" إحفظ قاعدة البيانات بداخله بإسم "tell"



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







قم بإدخال الحقول التالية:

no وهو حقل رقم الهاتف

name وهو حقل الإسم

adr وهو حقل العنوان

نوع البيانات جميعها جعلناها " نص " سهولة العمل

طبعاً لاتنسى تغيير خاصية "مفهرس" إلى "نعم" لكافة الحقول وذلك لتسهيل عملية الفرز.



ثم إحفظ الجدول بإسم "dalel"



ملاحظة هامة جداً:

أذا كنت تعمل على فيجوال بيسك 5 وعملت قاعدة بيانات على أوفيس 2000 أو 2002 فعليك تحويل قاعدة البيانات إلى إصدار 97

وذلك عن طريق قائمة أدوات ... أدوات مساعدة لقاعدة البيانات ... تحويل قاعدة البيانات.

أما إذا كنت تعمل على فيجوال بيسك 6 فهي تقبل قاعدة البيانات بإصدار 97 و 2000




إلى هنا نكون قد أنشأنا قاعدة البيانات أكتب فيها عدد من الأسماء والأرقام وحافظ عليها لأننا سنتعامل معها في الدروس القادمة.



الأن اغلق برنامج أكسس وإفتح برنامج الفيجوال بيسك . جهز الفورم وضع أداة Data ستجدها على صندوق الأدوات.

أحفظ المشروع في مجلد MyTell الذي أنشأت به قاعدة البيانات.



طريقة الربط:



من خصاص Data1 ستجد الخاصية :DataBaseName أنقر فوق الزر الذي يحوي ثلاث نقاط وحدد القاعدة التي أنشأناها "tell"

أيضاً سوف تجد الخاصية : RecordSource أنقر فوق السهم وإختر الجدول dalel.



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

ضع الكود في حدث Load للفورم



On Error GoTo data_error
Data1.DatabaseName = App.Path & "\tell.mdb"
Data1.Refresh
Exit Sub
data_error:
MsgBox "لم يتم العثور على قاعدة البيانات", vbCritical, "خطأ"




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