بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله وبركاته
سوف يكون هذا الدرس مقسوم لجزئين وهذا هو الجزء الاول :
واليوم
في هذا الدرس سوف نقوم بالتعرف على اهم الاوامر التي تجرى على قواعد
البيانات من خلال الفيجوال بيسك كان اضافة سجلا , تعديل , حذف والبحث بين
السجلات واضاهر عددها والتنقل فيما بينها سوف نبداء اولا بعمل قاعدة
بيانات خاصة لنا كما وضحت سابقا تحتوي على جدول واحد بأسم Table1 وثلاثة
حقول هي الاسم , العمر , عنوان السكن بعد الانتهاء من تصميم قاعدة
البيانات ندخل على برنامج الفيجوال بيسك 6 لنقوم بوضع الاداوات الالزمه
لتشغيل البرنامج سوف نقوم باضافة زر للحفظ وزر للتعديل وزر للحذف وازرار
التنقل بين السجلات واضافة اداة DataControl وبعد ذلك والان سوف نقوم
باضافة اداة لعرض السجلات تسمى بـ Microsoft Data Bound Grid تتم اضافة
الاداة بكل سهولة بالضغط على زر CTRL + T من لوحة المفاتيح سوف فور ضغط
الزر سوف يقوم برنامج الفيجوال بعرض مربع حوار خاص كما في الصورة ادناة
نقوم باختيار الاداة منه
وبعد ذلك باضافتها على واجهة البرنامج لينتهي هنا تصميم شكل البرنامج ويظهر بهذا الشكل
ومن
هنا نقوم بالبدء بعميلة الربط اولا نقوم بربط البرنامج بقاعدة البيانات
كما وضحت في الدرس السابق هنا وبعد الانتهاء من عملية ربط البرنامج بقاعدة
البيانات نقوم بربط الاداة التي تقوم بعرض البيانات باداة الـ DataControl
حتى تقوم بعرض البيانات منها بكل بساطة تتم عملية الربط من خلال الخاصية
حيث
نقوم باختيار الاداة التي نود عرض البيانات منها وهنا وفور تنفيذ هذه
العميلات بصورة صحيحة سوف نقوم بالانتقال خطوة والبدء بكتابة الاوامر
الاساسية اولا نقوم بكتابة كود زر الحفظ تتم عميلة الحفظ في قاعدة
البيانات اولا بكتابة جملة معينة لاعلام فيجوال بيسك باننا نود اضافة سجل
جديد وبعد ذلك نصل الى عميلة اسناد القيم الى الحقول المعينة ومن ثم جملة
لتحديث المدخلات وليكون الكود كله على بضعه بالشكل الاتي
كود PHP:
Private Sub Command1_Click()
Data1.Recordset.AddNew
Data1.Recordset.Fields!الاسم= Text1.Text
Data1.Recordset.Fields!العمر= Text2.Text
Data1.Recordset.Fields!العنوان= Text3.Text
Data1.Recordset.Update
End Sub
حيث
كما وضحت سابقا قمنا اولا باعلام برنامج فيجوال بيسك باننا نود ان نقوم
بعميلة معينة وهي عميلة الحفظ في قاعدة البيانات بعد ذلك بدئنا بكتابة
اسماء الحقول المعنية واضافة القيم لها ومن ثم تحديث المدخلات في قاعدة
البيانات واذا لم تكتب هذه الجملة فلن يظهر عند السجل المضاف او التعديل
اذا لم تقم باعداة تشغيل البرنامج وهنا انتهينا من اول كود وهو كود الحفظ
الان للنتقل للكود التالي وهو كود التعديل وكود التعديل لا يختلف كثيرا عن
سابقه حيث تكون العميلة بالشكل الاتي
كود PHP:
Private Sub Command2_Click()
Data1.Recordset.Edit
Data1.Recordset.Fields!الاسم= Text1.Text
Data1.Recordset.Fields!العمر= Text2.Text
Data1.Recordset.Fields!العنوان= Text3.Text
Data1.Recordset.Update
End Sub
حيث
العميلة نفسها والشرح نفسها ولكن في هذه المرة قمنا بطلب ان يقام بالتعديل
السجل المتوقف عليه وان لا يضاف سجل جديد للنتقل الان لكود الحذف والذي
سوف يكون بسيط جدا حيث يكتب بالشكل الاتي
كود PHP:
Private Sub Command3_Click()
Data1.Recordset.Delete
End Sub
حيث
بكل بساطة قمنا بتنفيذ امر لحذف السجل المحدد من قاعدة البيانات نهائيا مع
ملاحظة انه لا يمكن استرجاع السجل بعد حذفه مطلقا بالنسبة لاكواد الانتقال
بين السجلات سوف تكون كالاتي
كود PHP:
Private Sub Command4_Click()
Data1.Recordset.MoveNext
End Sub
Private Sub Command5_Click()
Data1.Recordset.MoveFirst
End Sub
Private Sub Command6_Click()
Data1.Recordset.MovePrevious
End Sub
Private Sub Command7_Click()
Data1.Recordset.MoveLast
End Sub
لا
يحتاج الى شرح الاكواد السابقة فلم نقم الا بطلب الانتقال ما بين السجلات
على حد سواء يمكنك تجربة الاكواد كما ان كود التحقق من عدد السجلات هو
كود PHP:
Private Sub Command8_Click()
MsgBox Data1.Recordset.RecordCount
End Sub
هذه هي اغلب الاوامر الشائعة الاستخدام