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

[رامي مازن]

بسم الله الرحمن الرحيم

اخواني اعضاء منتدى طلاب جامعة القدس المفتوحه
السلام عليكم ورحمه الله وبركاته

احبائي في الله نظرا للاقبال الرائع على موضوعي البرمجه بالفيجوال بيسك ونظرا لطلب الاخت نوال، فقد دفعني هذا دفعا الى وضع هذا الموضوع وهو عن ربط الفيجوال بيسك بقواعد البيانات اكسيس بثلاث طرق وهي :-
1- DataControl
2- DAO
3- ADO

والادوات التي بالاعلى هي من اسهل ادوات الربط بين قواعد البيانات والفيجوال بيسك واسلوب التعامل بيها ثابت الى حد ما ولايختلف كثيرا عن بعضه الا في بعض الاشياء الصغيره وبعض الاضافات التي تم تزويد كل اداه بها عل حسب الاصدار والحاجه للاستخدام , لذا سنجد ان الطريقه في التعامل شبه واحده من ناحيه النداء على الاداه والتعامل مع قاعده البيانات
وياريت الذي الموضوع ميقلش ايه ده داتا كنترول ايه وقرف ايه ده الادو او الداو احسن لا يا جماعه انا هنا بشرح بطريقه طلوع السلم من اوله مش من نصه غير كده برضه ميجيش حد يقوللي ابعد عن التطويل او الاستطراد وبرضه انا اسف يا جماعه انا شايف ان التطويل ممكن يكون في مصلحه ناس كتير مبتدئه في مجال البرمجه بقواعد البينات وهم دول اللي ليهم بشرح اما المتقدمين فعلا فانا ليهم اسعد وليهم قلبي يطرب اذا دخلو الموضوع وبصو بصه صغيره .اضافوا تعليق او ازاحو غموض

وارجوا من الاخوه اللي كانوا عملين مواضيع عن البرمجه بالادوات دي انهم ميزعلوش مني لاني عامل موضوع زيهم , لا بالعكس انا بتمنى انهم يساعدوني كمان في الموضوع بتاعي ونتبادل المنفعه كلنا انشاء الله
البدايه هتكون انشاء الله كالاتي:
1- معرفه كيفيه انشاء قاعده بيانات اكسيس
2- ربط قاعده بيانات بالداتا كنترول
3- ربط قاعده بيانات بالداو
4- ربط قواعد بيانات بالادو

(( اسف يا ابو سيف احكيت شوي بالمصري ))

[رامي مازن]

الدرس رقم 1#


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

افتح الاكسيس ومن قائمه ملف، اختار قاعده بيانات فارغه او (blanck database ) طبعا سوف يقوم الاكسيس بسؤالك(( وين ببدك تخزنها)) مثل الصوره هذه :-


طبعا هتعمل فولدر جديد وتخزن القاعده فيه علشان نستعمل القاعده هذه بعدين، هتظهر شاشه يقوللك بدك الجدول تعمله كيف؟؟
وحيعطيك 3 خيارات زي محنا شايفين في الصوره :-



اول اختيار :- انشاء قاعده بيانات في وقت التصميم . بمعنى انه هيخليك تقدر تعمل تصميم اولي لقاعده البيانات علشان تقدر تحط فيه بعد كده البايانات براحتك
تاني اختيار:- انشاء قاعده بيانات بواسطه معالج اكسيس . خيار ملهوش لازمه
ثالث اختيار انشاء قاعده البيانات وادخال البيانات مباشره مع بعض وده خيار ملخبط شويه فياريت كلنا نوجه مؤشر اموس للخيار الاول ولما نختاره هتظهر الشاشه دي:-


بعد كده لازم ناخد بالنا من نقطه مهمه :- ان زي ما احنا شايفين في الصوره دي:-



ان في انواع من البيانات زي ايه :
Text معناها نصي وبيديللك الحقل بطول سلسله حرفيه معينه مينفعش المستخدم يدخل فيها اكتر من الرقم اللي انت مدخله بمعنى لو انت حاطت للاسم 10 حروف بس والمستخدم 30 حرف الباقي كله طار ومش هيتخزن غير العشره بس وفي نفس الوقت لو زادت عن الحد اللي المفروض تكون عليه هتكبر قاعده البيانات على الفاضي يعني لما يكون الاسم ممكن يكون 50 وتديله 500 المساحه الماخوذه علىالهارد ديسك للبيان ده هيكون 500 حرف مش 50 ومينفعش اننا نضغط قاعده البيانات علشان نوفر في المساحه فلازم نحسبها صح من الاول

Memo سلسله حرفيه طوبله لانمها مذكره ودي القاعده بتبقى مهيئه لاخذ اي عدد من الحروف ومش مقيده باي قيد

Number ودي بقى للارقام فقط يعني الارقام اللي ممكن نعمل عليها عمليات حسابه فقط يعني الاعداد الصحيحه والعشريه والكسريه
وكل حاجه تمت للعمليات الحسابيه بصله

Date\time التاريخ والوقت يعين حقول مبتقبلش غير صيغه معينه لوقت والتاريخ
Currency العمله والعمليات الحسابيه اللي بت تم عليها

Autonumber الارقام المتولده عشوائيا

Yes\no القيم المنطقيه ودي ممكن تكون شكلها في الفورم بتاع الفيجوال بيسك انها تكون قدام خانه اعزب\متزوج او فتى\ فتاه

دول اكتر حاجه هنستخدمهم في قاعده البيانات بتاعتنا والباقي للي عايز يشبع فضوله عباره عن ربط كائن بقاعده البيانات واضافه وصله لموقع والكلام ده

طبعا بعد منخلص الحقول اللي احنا محتاجنها هنعمل حفظ ساعتها هيطلب اسم الجدول زي ما في الصوره دي :-


كلنا نسميه tel
لاننا هنادي عليه من الفيجوال بيسك بالاسم ده طبعا كلنا فاهمين

طبعا بعد ما تكتب الاسم هتظهرلك رساله بتقوللك اعمل للجدول مفتاح اولي؟ زي مافي الصوره دي


يعني هتخلي الجدول في حقل متعلم بعلامه ومتربط مع بقيت الجداول جوه قاعده البيانات اكسيس ( لان القاعده الواحده بتشيل جداول زي منت عايز)


طبعا انت معندكش غير جدول واحد ومش محتاجين الكلام ده فاعمل لا
كده الجدول اتعمل وبقى موجود في قاعده البيانات اللي اسمها تيل زي منت شايف في الصوره دي:-



هل احنا كده خلصنا؟
لا في مشكله ملهاش حل
ان الداتا كنترول وهي دي اللي احنا داخلين عليها مبتشيلش قاعده بيانات اكسيس معموله بالكسيس 2002 يعني اللي موجود في اوفيسش اكس بي او اللي موجود في اوفيس 2000 ليه؟
لان قاعده البيانات اللي معموله بالاكسيس 2000 فما فوق فيهم امكانيات الكائن العادي اللي زي داتا كنترول ميقدرش يقراها علشان كده لازم نعمل تحويل للقاعده ديه علشان تبقى اكسيس 97 ازاي
باختصار:-
Tooles>database utilities>convert database> to access 97 file format

طبعا لازم نعملها فولدر مخصوص ونحط فيه القاعده وكمان هو ده فولدر المشروع
بعد مانعمل تحويل بتقابلنا مشكله ان القاعده بقت مقفوله مينفعش اني اضيف حفول او اعدل في الحقول ودي مشكله كبيره بس هنتغلب عليها اول منخش في الداو
في حاجه كمان بعد ما بنعمل تحويل للقاعد علشان تبقى 97 بتقابلنا مشكله انه كل مان فتح الاكسيس (وهنحتاج اننا نفتحه كتير علشان نتابع التعديلات اللي حصلت في القاعده من جوه الفيجوال بيسك) بتقابلك رساله حواريه بتطلب انك تعمل تحويل للقاعده ل xp او انك تفتحها فياريت تخلو بالكم من الختيار في الحته دي

بكدا الدرس الاول خلص يا جماعه ارجوا انكم تكونو استفدتم منه والقاكم في بدايه اداتا كنترول انشاء الله
اخوكم رامي مازن
(( سامحنا يا ابو سيف على اللهجه المصريه ))

[ما بعرف]

شكرا على الموضوع اخي

[نوال202]

تعجز كلماتي عن شكرك يا اخ رامي و لكن الدعاء الفضل
الله يجزاك خير في الدنيا و الاخره

[Smarter_Silwady]

مرحبا اخوي رامي

بالنسبة للفيجيوال بيسك هل هو (6) ام (.net)

اذا كان دوت نيت فان شاء الله راح اكمل معك

سلام

[رامي مازن]

الدرس رقم 2#
بسم الله الرحمن الرحيم


الدرس اللي فات عرفنا كيف نصمم قاعده بيانات بالاكسيس وكان ممكن نصممها من جوه الفيجوال بيسك بس الطريقه هذه اسهل من انك تتعامل مع البريمج اللي بيعمل قواعد البيانات في الفيجوال بيسك لانه هيخنقك كتير
المهم
اليوم هنبدا نتعامل باول كائن لقواعد البيانات و هذا كائن بسيط ميكروسوفت عملته علشان قواعد البيانات الصغيره لانه مش قوي بس انا فضلت اننا ناخده لاسباب كتير ان في ناس بتدرسه ومحتاجين فيه مساعده وفي ناس بتبرمج بيه قواعد بيانات غير كده وكده اسهل في التعامل وهنتعلم اليوم انشاء الله هذه الامور :-
1- ربط الداتا كنترول بقاعده البيانات
2- ربط بقيه الكائنات بالداتا كنترول
3- كيف نتعامل مع زر جديد وحفظ ومسح وبحث

المره اللي جايه انشالله هنتعامل مع زراير اول اخر التالي السابق وكمان هنتعامل مع الداتا بوند جريد اللي بتعرضلنا البيانات اللي في الفقاعده كامله وممكن نعمل عليها بحث

اولا :- لازم تكون عندك قاعده بيانات جاهزه ومفتوحه وفيها الجدول اللي انت عايزه طبعا هتكون زي اللي في الدرس اللي عملناه المره اللي فاتت فياريت اللي معملش يعمل
ثانيا :- افتح مشروع جديد وحط فيه الحاجات اللي هقولهالك
1- 5 صندوق نص (text box)
2- 5 عنوان اسم (label) بالاسماء – * الاسم * العنوان * تليفون منزل * تليفون محمول * ايميل (طبعا اللي عايز يزود لازم يزود عمود في جدول القاعده)
3- 10 زراير باسماء * جديد * حفظ *مسح * بحث *اظهار الكل * امام * خلف * الاول * الاخير * خروج
4- اضف من قائمه الادوات الاداه التي تسمى data

زي الشكل ده :-



الخصائص :-
قبل ما نبدأ نبرمج لازم نضبط الخصائص , وهي اللي هتحدد انا شو بدي اعمل بالاداه اللي في ايدي ممكن اعمل على المستخدم نظام اجباري للتعامل مع البرنامج يعني ما اخلي على سبهلله لانه اكيد مليون في الميه هيفتكس حاجات في البرنامج تطلع رسائل خطاء فانا من خلال تحديدي لمسار شغل المستخدم على البرنامج باحمي البرنامج من اظهار الاخطاء

الكائن الخاصيه القيمه السبب
Text (x) enabled false تحديد حركه المستخدم حتى لايضيف مالا نريده ***
Command2 enabled false حتى لايضغط عليه المستخدم قبل ان يضغط زر جديد
DATA1 visible false وضعنا ازرار امام وخلف بدلا منها مع شكلها الغير لطيف



بعد اضافه الخصائص الى المشروع نبدا على بركه الله في تربيط قاعده البيانات بالداتا كنترول ثم نقوم بربط الكائنات الاخرى ايا كانت بالداتا كنترول التي قمنا بتوصيلها بقاعده البيانات

انظر الشكل :


تذكر :- قم بمسح مسار القاعده بالكامل (ماعدا قاعده البيانات بالطبع) حتى لاتحدث مشاكل في حال قمت بنقلها من جهاز لاخر


بعد ان قمنا بتحديد قاعده البيانات المطلوبه يجب ان نقوم بتحديد الجدول المراد فتحه من خلال الخاصيه RECORDSOURCE

قم بتحديد اسم الجدول TEL كما انشاناه في القاعده في السابق

احنا هيك ربطنا القاعده بالداتا كنترول لكن شو إلي يخلي صناديق النصوص تشوف الذي داخل القاعده هنربط هذه الصناديق بالداتا كنترول وده هيتم بخاصيتين : DATAFIELD و DATASOURCE
زي ما احنا شايفين:




وطبعا هنقوم بتغيير DATAFIELD في كل مره على حسب صندوق النص يعني واحد للاسم والتاني العنوان والاخير الايميل اما DATASOURCE هتفضل ثابته

بعد ما ربطنا تعالو نبدأ مع بعض نحط الكود:-
اولا الاكواد الاوليه:
زر جديد:-


كود:
Data1.Recordset.AddNew
Command1.Enabled = False
Command2.Enabled = True
Command3.Enabled = False
Command4.Enabled = False
Command5.Enabled = False
Command6.Enabled = False
Command7.Enabled = False
Command8.Enabled = False
Command9.Enabled = False

Text1.Enabled = True
Text2.Enabled = True
Text3.Enabled = True
Text4.Enabled = True
Text5.Enabled = True

زر حفظ :-


كود:
Data1.Recordset.Update
Command1.Enabled = True
Command2.Enabled = False
Command3.Enabled = True
Command4.Enabled = True
Command5.Enabled = True
Command6.Enabled = True
Command7.Enabled = True
Command8.Enabled = True
Command9.Enabled = True

Text1.Enabled = False
Text2.Enabled = False
Text3.Enabled = False
Text4.Enabled = False
Text5.Enabled = False


زر مسح:-



كود:
Data1.Recordset.Delete

زر بحث:-


Dim X As String

كود:
X = InputBox("ÇÏÎá ÇáÇÓã", "ÇáÇÌäÏ&arin g;")Data1.RecordSource = "SELECT * FROM TEL WHERE NAME = '" + X + "'"Data1.*******

زر اظهار الكل :- الدرس القادم

زر اول:-

Data1.Recordset.MoveFirst


زر اخر:-

Data1.Recordset.MoveLast


زر امام:-

Data1.Recordset.MovePrevious

زر خلف:-

Data1.Recordset.MoveNext


الى هنا وانتهي الدرس الثاني
ارجوا ان ينال اعجابكم
و أرجوا ان ارى ردودكم و بأذن الله انتظروا الدرس الثالث

تقبلوا مني كل الاحترام و التقدير
أخوكم رامي مازن

[BasharSS]

موضوع وشرح مميز اخ مازن
شكرا جزيلا لك وجعله الله في ميزان حسناتك
الموضوع يستحق التثبيت

لكن اود ان انوه الى موضوع مرتبط بعنوان :
ملزمة توضح ربط الفيجوال بيسك مع قاعدة بيانات اكسس
عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ]

[رامي مازن]

اشكرك اخي و صديقي بشار على التثبيت و على المرور

[نوال202]

انا معك يا استاذ رمي عم طبق الشغل خطوه بخطوه .....................................مشكور الله يعطيك العافيه

[نوال202]

ممكن يا اخ رامي تشرح كود زر بحث بشيء من التفصيل لاني و بصراحه مافهمته اذا مكان عندك مانع يا استاذ