الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

حسبى الله فى مكتبة dao 3.6

مغلق
بدأه mancoeg في 5 يوليو 2006 · 4 رد · 555 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

عملت جدولين بالاكسس الول اسمه

جدول الاباء ويحتوى على الحقول التالية

-رقم الاب مفتاح اساسى

-اسم الاب نص

وجدول الابناء ويحتوى على الحقول التالية

-رقم الاب مفتاح غريب

-رقم الابن مفتاح اساسى

-اسم الابن نص

عايز اعمل فورمة بالفيجوال بيسيك 6 واربطها عن طريق مكتبة dao 3.6

وعايز كود زر حفظ البيانات

وكود زر مسح البيانات

ولكم جزيل الشكر

#2

معقولة مفيش حد عنده رد دة سؤال سيط جدا

وبالمناسة الموضوع ده هيطور من خلال الاسئلة واجابات الاعضاء

وبكدة يبقى دة مرجع للمحترفبن فى قواعد البيانات وكمان مفيد للمبتداين

لان السؤال دة الاجابة علية هو بداية عمل قواعد بيانات

اتمنى المشاركة

ولكم جزيل الشكر

#3

اولا كود حفظ البيانات

اعمل زر وسميه جديد مثلا

وضع فيه الكود التالي

Set RS = DB.OpenRecordset("MyTable", 2)
RS.AddNew

وهذا في زر الحفظ

RS("Father_ID") = Trim(Text1.Text)
RS("Father_Name") = Trim(Text2.Text)
RS.Update

اما زر الحذف فيكون كالتالي

dim conf as string
conf = MsgBox " هل تريد حذف البيانات", vbOKOnly + vbQuestion + vbMsgBoxRight, "حذف"
if conf = vbYes then RS>Delete

جرب ولو واجهت اي مشكلة ان شاء الله نحلها

الى اللقاء

JusT LeT YouR MinD WorK

#4

مشكور على الرد

لكن مكتبة ايه اللى استخدمتها DAO, ADO

وفى كلا الحالتين انا عايز اعمل كومبوبوكس يكون فيها اسماء الاباء الموجودة بحقل F_NAME

بشرط استخدم جملة SELECT

منتظر الرد

#5

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

الكود السابق يستخدم تقنبة DAO حسب ما طلبت والفرق بينهم ليس كبير ولكن تقفنية ADO هي الافضل

جملة Select سيتم استخدامها لفتح الجدول ولكن لا يمكن ملء الجدول من خلالها وانما من خلال الـ RS الذي يحتوي عليها

ولملء الكومبو بوكس قم بعمل الاتي :

RS.MoveFirst
Do While Not Rs.EOF
Combo1.AddItem Rs("F_NAME")
Rs.MoveNext
Loop

============

الى اللقاء

JusT LeT YouR MinD WorK

هذا الموضوع مغلق.

مواضيع مشابهة