اخي الكريم المنتدى لخدمة جميع اعضاء المنتدى ولا ترسل الطلبات على البريد وانما يضعها الاعضاء والمشرفين في نفس ردودهم ليستفيد منها الجميع ... بارك الله فيك
وعليكم السلام ورحمة الله وبركاته
أخي الحبيب أبا خليل
كما تعلم أخي أن الاكسس لا يصدر التقرير الا للصيغ المعروفة اكسل وررد بي دي اف وغيرها أما الصور فلا يتم .... لذلك يمكن استخدام برنامج SnagIT وجعل الطابعة الخاصة بها افتراضية ثم طباعة التقرير غلى هذا الاساس
أرجو ان اكون قد أوصلت الشرح بالطريقة الصحيحة ... بارك الله فيك
تفضل ضغ هذا الكود في الفورم
Private Sub Form_Timer()
If MyTime = Empty Then MyTime = Now()
'غير الرقم واحد الى الرقم أو الدقائق المطلوبة
If Now() >= DateAdd("n", 1, MyTime) Then DoCmd.Close
End Sub