كيفية طباعة نموذج من داخل نموذج آخر

رستم · أغسطس 21, 2004

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

سؤالي هو أنه:

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

فماهو الكود الذي يمكنني به عمل ذلك

أرجو مساعدتكم ولكم جزيل الشكر

**osama457** · أغسطس 21, 2004

الأفضل أن تكون الطباعة لتقرير بدلا من نموذج إذا كان ذلك ممكنا

وفي حال إصراراك على طباعة النموذج جرب ما يلي :

عن طريق المعالج اعمل زر يفتح النموذج الثاني على السجل الحالي في النموذج الأول

ثم استبدل العبارة

DoCmd.OpenForm stDocName, , , stLinkCriteria

بالعبارة التالية (من سطرين ) :

DoCmd.OpenForm stDocName, acPreview, , stLinkCriteria, , acHidden, "ForPrint"
    DoCmd.Close acForm, stDocName

ثم في النموذج الثاني المطلوب طباعة اكتب في حدث عند التنشيط (Activate)

If Me.OpenArgs = "ForPrint" Then
    DoCmd.PrintOut
End If

للفائدة الأمر DoCmd.PrintOut

له خيارات متعددة يمكنك مراجعتها في التعليمات

**osama457** · أغسطس 21, 2004

هذا مثال

تم تعديل أغسطس 21, 2004 بواسطه osama457

الردود الموصى بها