تسجيل الدخول

مشاهدة النسخة كاملة : كود اخير وينتهى البرنامج ارجو المساعدة



ابو عيسى المصرى
27-08-2007, 08:37 PM
المطاوب هو المساعدة فى هذا الكود
http://http://9q9q.net/9q9q.net.gif (http://upload.9q9q.net/file/DC7Ba58d7/222222.JPG.html-Accounting.html)

سوف نعطى مثال على هذه العمليه للتوضيح نحن نريد حفظ اسم سياره مع كل موديل وتاريخ الانتاج
المشكله هى تكرار اسم السيارة مع كل موديل وتاريخ الانتاج
كما هو موضح فى الصورة المرفقه
ليكن resource هو اسم السياره
وليكن sequance هو اسماء الموديلات
وليكن type هو تاريخ الانتاج
كيف يمكن حفظ كل ذلك فى مره واحده اى فى ضغطه واحده على زر الحفظ ارجو كتابه الكود المطلوب علما باننى قد برمجت هذا باستخدام data control

أبو هاجر الحلوة
28-08-2007, 02:09 PM
رابط الصورة غير واضح لكني استطعت الحصول عليها و قد تم إرفاقها مع هذا الرد

لماذا لا تنشأ جدولا للموديلا و جدولا آخر للسيارت بحيث تكون العلاقة بينهما واحد نحو متعدد
الموديلات (1)------------------->(oo) السيارات
جدول الموديلات :Models يتكون على الأقل من حقلين :IdModel و Model
و جدول للسيارات Cars يتكون من حقل IdModel و حقول وصفية أخرى
الحقل IdModel سيكون الرابط بين الجدولين ثم قم بإنشاء إستعلام و احفظه داخل القاعدة
و اجعل اسم هذا الاستعلام هو قيمة الخاصية DataSource
لإضافة سجل إستعمل

Data1.RecordSet.AddNew
و لحفظه استعمل

Data1.RecordSet.Update

ابو عيسى المصرى
29-08-2007, 12:30 AM
شكرا جزيلا الى الاخ ابو هاجر الحلوة
وجارى تنفيذ النصيحة ولكن نرجوا معرفة كيفية انشاء استعلام داخل الاكسس
ارجو الرد سريعا
وشكرا للجميع

أبو هاجر الحلوة
29-08-2007, 11:45 AM
تستطيع ذلك من خلال الفجوال بيسك بواسطة القائمة Add-In/Visual Data Manager

على العموم هذا الاستعلام سيكون من الشكل


Select * From Models , Cars
Where Models.IdModel =Cars.IdModel


لكن الـ Data Manager يمكنك من تحرير وحفظ إستعلامات دقيقة جدا بواسطة معالج خاص و لن تحتاج إلى تحريره يدويا.كما أن به العديد من الوظائف الأخرى