ضع الكود في الزر التالي وطبق على البقية اذا احببت
On Error GoTo Err_أمر32_Click
DoCmd.GoToRecord , , acNext
Err_أمر32_Click:
MsgBox ("هذا آخر سجل ")
Exit Sub
لمنع ظهور الرسالة
لا يمكن الحذف من الجدول الرئيسي بشرط يكون بجدول فرعي هذا والله أعلم
يجب أن يكون الحذف مشروط بحقل يوجد بالجدول الرئيسي كما أرفقت لك في قاعدة سابقة وكما تحدث بها احد الاخوة فكلاهما واحد
والله اعلم
على حد علمي أيضا لا يمكن عن طريق الكود لأنه سيكون الحدث على جميع السجلات
كما أن استخدام الجمل الشرطية تعتمد على القيمة المدخلة أو غيرها ويجب أن تكون ثابتة
وإذا كان الجمل الثلاث التي ذكرتها هي فقط التي ستكون في الجدول تستطيع بالتنسيق الشرطي وضعها أما إذا كانت اكثر فلا والله اعلم واجل
اللي واضح في الجدول عندي ان احد الاعضاء وهو انثى وصل إلى 4 سنوات وكم شهر أي اكبر من ثلاث سنوات عند انشاء استعلام مبني على جدول Members بمحتوياته كاملا واستعلام واحد فقط حقل age وضعنا تحت الحقل شرط وهو >=3 نتج عنه ترحيل هذا العضو مع بقائه في جدول Members
استعلام الالحاق يكون من الجدول والاستعلام 1 معا
سوي استعلام الحاق مبني على جدول Members واستعلام 1 وحط الشرط تحت age >=3 والحقه بجدول Members2
ونفس الطريقة بجدول الاشتراكات بكذا يسوي ترحيل للجدولين المحددين بدون حذف العضو من الجدول الرئيسي
وحط تحت زر ترحيل كود تشغيل الاستعلامين كل استعلام على حده وبكذا يتم الترحيل للجدولين لمن مرى عليه ثلاث سنوات أو اكثر إذا كان age تعني مرور ثلاث سنوات فاكثر قاعدتك ما فهمتها
هذا والله اعلم
انت اطلعت على الفيديو اللي ادرجته ما حذف معي احد ما ابغاه ينحذف بعد ادراج حقل نعم /لا في جدول الاعضاء وبناء كود الحذف على اساسه والنموذج مبني على استعلام شغله شرح اللي صار لكن اطلع على القاعدة اللي ارسلتها لك قبل وشوف وش سويت في النوافذ والاستعلامات والاكواد وطبقه انت على قاعدتك وان شاء الله تصل
جرب القاعدة
أولا افتح نموذج Eshtrak1
حدد على العضو المراد ترحيله إلى جدول الارشيف حتى نستطيع ارجاعه فيما بعد
واضغط على ترحيل ثم اضغط بعد ذلك على حذف
بعدا افتح جدول Emp تجد الاعضاء الذين تم اختيارهم مع اشتركاتهم في جدول Eshtrk الاخر وليس القديم
قبل الترحيل والحذف اضغط على حفظ
بروح للصلاة واقوم بزيارة أعود اجد الاجابة
محاولة.rar
أخوي أكسس
بالقاعدة اللي ارسلتها لك في جداول مضافة تلقى فيها بيانات العضو اللي حذفته من الجدول ارئيسي لعدم دفعه ولمرور ثلاث سنوات وتلقى فيه ملف باسم اشتراك بنفس الاسم مع نقص حرف من جدولك تلقى فيه اشتركات اللمحذوف وهو مرتبط بالجدول emp على ما اذكر
القاعدة اللي عطيتك يحذف العضو ولكن موجود بجدولين هو واشتراكاته اقدر ارجعه بنفس الكود مع فورم جديد للمرحلين مثل ما قلتلك
بكرة ان شاء الله لي محاولات وربك يقدر اللي فيه الخير
أنا أرسلت لك ملف فيه اللي طلبته بس بيكون كل سجل منفرد ترحيل وحذف يرحل العضو بكل ما يرتبط فيه من جدول الاشتركات
وبكذا نعمل نموذج خاص بالمرحلين ونضع فيه الكود نفسه ونغير مسمى الجداول فقط ويرجعون للجدولين السابقين بنفس المعلومات
شوف أنا عملت الان استعلام يظهر الفارق بين تاريخ نهاية الاشتراك وتاريخ الحالي ويطلع الفرق ثلاثة سنوات او مهما كان الفارق
لكن باقي اشتغل على عملية الالحاق والحذف ونشوف وش يطلع معانا
شوف يا غالي
أولا لازم نعرف مالذي نستفيده من الجدول المنشأ قبل إنشائه
جدول الاعضاء : يسجل فيه الأعضاء بالمعلومات .
جدول الاشتركات : مرتبط مع جدول الاعضاء رأس بأطراف .
نعمل جدولين بنفس الحقول في كلا الجدولين السابقين
مهمتهما فقط حفظ البيانات لا أكثر ولا أقل للاسترجاع مرة آخرى حين الدفع