فتح نموذج رئيسي على سجل محدد داخل نموذج فرعي

[nokia_c65]

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

تحية طيبة للجميع ...

في البدء احب اشكر جميع الاعضاء والمسؤولين عن هذا الموقع الاكثر من رائع ،

لدي برنامج لحساب ايجار السيارات فيه نموذج رئيسي (Pe) يحتوي على نموذج فرعي (Pls) ، النموذج الفرعي فيه سجلات تكون عديدة ، مشكلتي تتلخص في عملية الذهاب الى سجل محدد في النموذج الفرعي (Pls) من خلال نموذج البحث المسمى (Main2) ... ((مثلاً عند فتح النموذج (Main2) والنقر على تفاصيل (6 - نينوى) اريد ان يفتح النموذج الرئيسي (Pe) ويكون النموذج الفرعي(Pls) فيه تفاصيل السيارة (6 - نينوى) .

تعبت من البحث بلا فائدة ، هل توجد طريقة اغفل عنها لعمل ذلك ؟؟

تحياتي للجميع مقدماً ...

السيارات.accdb

[nokia_c65]

السلام عليكم ...
اود اشكر الجميع في البدء ...

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

وساكتب الحل لغرض الفائدة للجميع ،

الحل هو كتابة الكود التالي عند الضغط على زر تعديل في نموذج (Main3) :

 

 

Private Sub edi_Click()
    Dim Ahd As Variant
    Ahd = "[ID]=" & [ID]
    DoCmd.OpenForm "Pe", , , Ahd
    
Forms!Pe!Pls.Form.Filter = "[IDD] = " & Me.IDD
Forms!Pe!Pls.Form.FilterOn = True

End Sub

 

الملف مرفق بعد التعديل للفائدة

تحياتي للجميع ...

 

 

السيارات.accdb