مشكله ارهقتني

[عادل صنهات]

اعزائي الاعضاء

السلام عليكم , لديى مشكله في الاكسس أرجو أن تتسع صدوركم لها

لقد قمت بتصميم برنامج عن التقسيط .

وقمت بوضع جدولين للمقترض الاخر للكفيل جدول المقترض به حقل ( رقم الكفيل . وهو ترقيم تلقائي ) وجدول الكفيل به حقل ( رقم الكفيل )

وقمت بتصميم نموذجين للمقترض وبه زر فتح نموذج للكفيل وقمت بتصميم نموذج للكفيل .

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

[أحمد الحربي]

في حدث الزر في نموذج المقترض ضع الكود التالي مع مراعاة الأسماء التي اخترتها أنت للحقلين ( رقم الكفيل في كل من جدول المقترض وجدول الكفيل ) .. أما أنا فاستخدمت :

اسم نموذج الكفيل = frmKafeel

حقلي رقم الكفيل في كلا الجدولين = kafeelNo

DoCmd.OpenForm "frmKafeel", , , "kafeelNo=" & Me.KafeelNo

[as_sa2003]

ممكن أن توجد ثالث لهذه العملية

بان يكون كومبوا مثلاً

و تنشئ ماكروا يقوم بفتح النموذج كما هو محدد له القيمة في الكومبو

و نفس الماكروا لفتح النموذج الأخر

و بالتالي أوجدت في الكومبو القيمة المشتركة بين النموذجين

و لقد نفذت ذلك كثيراً

إذا لو لم تكن الفكرة واضحة أخبرني

و أوضح أكثر أن شاء الله

[مندل]

تضع الامر التالي في نمودج المقترض ودلك عند فتح نمودج الكفيل يسبق هدا الامر امر فتح نمودج الكفيل

[forms]![رقم الكفيل]![الكفيل]=forms]![رقم الكفيل]![المقترض]