أريد طباعة تقرير طبقاً حسب تحديد الاسم من check

يا إخوان تكفون هل من مساعدة لوجه الله 

تكفون ساعدوني الله يرحم والديكم .

يا سلام 

الله يحفظك ويبارك فيك وفي ذريتك وعلمك 

الله يحفظك ويرحم والديك ويرزقك الجنة . 

أسأل الله أن يحرم عن وجهك النار ويدخلك الجنة بغير حساب ولا سابقة عذاب . 

الله لا يحرمنا منك ولا يحرمك الأجر . 

تقبلي فائق تقديري واحترامي .

أختي الغالية بارك الله فيك وفي علمك 

أختي هناك مشكلتين 

الأولى عدم التقيد بالتحديد يعني يطبع كل الموجودين 

والثانية عدم طباعة الصور . 

سامحيني على كثرة طلباتي وثقل دمي . 

تقبلي فائق تقديري واحترامي .

اخي الفاضل

البرنامج عندي يطبع صفحة واحدة فقط وبها بطاقتن مع الصور الخاصة بهما وجه وقفى

طبعا التقرير الخاص بك ( الذي به الصور ليس له مصدر سجلات ) 

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

بالتوفيق

أختي الغالية 

تم حل مشكلة الصور . 

تقبلي فائق تقديري واحترامي .

أختي الغالية 

عدلت مصدر السجلات إلى الاستعلام choose  

ولكن يتم طباعة جميع السجلات .

دمت في حفظ الله . 

اخي الفاضل

طالما انك استخدمت استعلام choose  

الآن انت تحتاج الى معيار لضبط عملية ظهور السجلات المختاره فقط في التقرير

وسيكون المعيار هو حقل  Check بين النموذج وبين التقرير

لذا يحب بشكل ضروري ادراج حقل  Check في التقرير في قسم تفصيل ثم تقوم بإخفاؤه

الآن سوف نستخدم الكود التالي تحت زر أمر الطباعة

Private Sub Print_Click()
Dim stLinkCriteria As String
stLinkCriteria = "[check] =-1"
DoCmd.OpenReport "Report1", acViewNormal, , stLinkCriteria
MsgBox "فضلا اخي الكريم ... انتظر حتى تتم طباعة الوجه الأمامي " & vbNewLine & vbNewLine & _
"وبعد خروج الورقة من الطابعة اقلب الورقة وادخلها في الطابعة مرة اخرى  " & vbNewLine & vbNewLine & _
"ثم اضغط موافق لطباعة الوجه الخلفي", vbMsgBoxRtlReading
DoCmd.OpenReport "Report2", acViewNormal
End Sub

الله يحفظك ويرفع قدرك ويرزقك من فضله . 

أختي كذا تمام . 

لكن أحتاج إلى طريقة لحل مشكلة الورقة الثانية . 

دمت في حفظ الله ورعايته .

الحل الوحيد لديك لتلافي مشكلة الورقة الثانية

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

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

ولا تنسى اضافة حقل  Check  ايضا للتقرير الثاني 

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

DoCmd.OpenReport "Report2", acViewNormal, , stLinkCriteria

الله يحفظك ويرحم والديك ويصلح لك الحال والمال والذرية 

الله يرزقك من فضله ويكتب لك الأجر . 

فرج الله همك كما فرجتي عني . 

الله لا يحرمك الأجر ويجعل ما تقومين به في موازين حسناتك . 

تقبلي فائق تقديري واحترامي .