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

برنامج دليل الهاتف ..

مغلق
بدأه فتى الوادي في 21 نوفمبر 2002 · 5 رد · 2,039 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم ..

أن جديد على منتدى الفيجوال .. لدي خلفية لا بأس بها في الأكسيس .. وصممت عليه عدة برامج .. من ضمنها برنامج دليل الهاتف على قدي ..

المهم عندي رغبة في تعليم الفيجوال.. وأحب أن أبدا تعلم الفيجوال بتصميم برنامج دليل الهاتف ..

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

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

mk17481_26bccea871.gif
#2

السلام عليكم

يا ريت تبدأ بقرائه فصل من كتاب "علم نفسك فيجوال بيسك 6 في 21 يوما" دا الفصل حيخليك تقدر تبني النماذج في البيسك بسهوله وبعدين إن شاء الله نبدأ سوى وانا مستعد أساعدك ولو عندك أي سؤال أتفضل أسأل لشان نتشرف بالإجابة علية

وشكرا

#3

السلام عليكم ..

أشكرك على الرد ...

أنا فعلاً أقرأ كتاب ( علم نفسك فيحوال بيسك ... ) لـ جريج بري .. ترجمة مكتبة جرير ... وغيره من الكتب ..

لكني أستفيد أكثر وأسرع من الأمثلة التطبيقية أكثر من الكتب ...

بالنسبة للنماذج هذه معروفة .. وبعض الأكواد ما عندي غيها مشكلة ....

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

وياليت تبفى معي في هذه النقطة ..

والسلام عليكم

mk17481_26bccea871.gif
#4

السلام عليكم

خلاص ممتاز جدا لو بدأنا من حين

خلاص في على اليسار أداة إسمها Data Control نزلها على الفورم لو لا حظت إسمها من الخصائص حتلاقيه Data1

المهم من الخصائص كمان Data source أضغط علية ومن هناك حدد إسم الData Base والجدول اللي انت تبغى تربط بيه ولا هنا انت خلاص ربط الأداة بقاعدة البيانات والجدول .

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

الإضافة

Data1.Recordset.AddNew

الحذف:

Data1.Recordset.Delete

التعديل:

Data1.Recordset.Edit

ولكن في التعديل اي بعد ما تضغط تعديل لا بد من حفظ التغييرات اللي سويتها مباشرة علشان كدا انت محتاج الكود التالي للحفظ:

Data1.Recordset.Update

الإلغاء:

Data1.Recordset.Cancel

إن شاء الله اخوي اكون فدتك قدر المستطاع ولو عندك اي استفسار حولين الكود الجديد لو سمحت لا تتردد في السؤال علشان تعم الفيدة وانا اخترت الDataControl علشان انت لسه تبغى تتعلم الفيجوال بيسك

ملاحظه الDataControl لا تعمل إلا مع الAccess 97 والله يوفقك إن شاء الله.........وشكرا

#5

السلام عليكم

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

جزاك الله خير على هذه المعلومات القيمة ... الله ينور عليك .

لكن وش الحل مع الجدول على أكسيس 2000 ... هل هناك طريقة للعمل معه ؟!

أنا أتبعت طريقة تصميم الجدول على 2000 ثم تحويله إلى 97

هل هناك طريقة اخرى ؟!؟

وبارك الله فيك وزادك علماً .

والسلام .

mk17481_26bccea871.gif
#6

السام عليكم

شوف حبيبيال Data Control تعمل فقط مع الAccess 97 ومن هنا مالك غير إنك تستعمل أدوات أكتيف إكس اللي هيه ADO المهم طبعا هنا انت لازم تعرف ال Connection مع ال Data Base ,hgRecordset بالكود طبعا وإليك الطريقة:

Dim Mydb as new connection

dim rs as new recordset

mydb.open"select * from Table1" ,openadynamic,adoptimistic

ولا تنسى تسأل لو في شئ غير مفهوم..........وشكرا

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

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