تحديث النموذج الفرعي الثاني بعد حذف سجل من النموذج الفرعي الاول

[solomoon]

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

الاخوة الافاضل الكرام

ممكن مساعدة من فضلكم

عندي نموذجين فرعيين 1و2 في نموذج رئيسي

اريد حذف سجل من النموذج الفرعي 1 طبعا سيتم حذف البيانات

المرتبطة معه من النموذج 2 بحكم علاقة رأس واطراف

اريد طريقة للتحديث بعد حذف السجل كما في الصورة رفقته وشكرا

[ابو ياسين المشولي]

جرب استخدام

Me.Requery

 

[solomoon]

شكرا يا استاذ على الاجابة لكن الامر لم ينجح لان زر الحذف موجود بالنوذج الفرعي 1 والتحديث يجب ان يحدث في النموذج الفرعي 2

هل ممكن ارسال المشروع للاطلاع عليه ومساعدتي؟

سأكون شاكرا لكم وممنونا لكم لمد يد المساعدة

[ابوخليل]

لنفرض ان  عنصر التحم للنموذج الفرعي 2  اسمه   subfrm2 وأن النموذج الرئيس اسمه form1

اكتب السطر التالي بعد امر الحذف الموجود في الفرعي1

forms!form1!subfrm2.Requery

 

[solomoon]

شكرا يا استاذ ابو خليل على الرد السريع

وضعت الكود مع امر الحذف في زر بالنموذج الفرعي 1 لكنه يعطيني خطأ بالنظام رسالة السيرفر OLE مع الاكسس لم افهم معنى الرسالة

الكود الذي كتبت هو 

docmd.RunCommand acCmdDelete او

docmd.RunCommand acCmdDeleterecord

للاسف نبع لي مشكل لم يكن بالحسبان

كيف اتصرف من فضلكم ولكم جزيل الشكر

[ابوخليل]

كأني فهمت انك كنت تستخدم  زر الحذف  من لوحة المفاتيح  بعد تحديد السجل

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

واجعل سطر التحديث  اعلاه في الاسفل في آخر الكود 

[solomoon]

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

اولا قمت بتحويل ماكرو الحذف الى كود vba واضفت كود الحديث الذي ارسلت الي (ومشكور جدا على الكود نفعتني احسن الله اليك)

بعد ذلك انشأت ماكرو وقلت له ايتيني بالدالة (دالة الحذف المتضمنة لكود التحديث) وهكذا تم الحذف والتحديث كما كنت ارغب

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

المنتدى ناجح برجال امثالك يا استاذ ابو خليل نفع الله بك

تحياتي