فتح التقرير بشرط عدم فتح التقرير اذا لم يحتوي علي بيانات

[moh198511]

الاخوة الافاضل...

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

في البداية اقدم كل الشكر للمنتدى والقائمين عليه في مساعدتنا

الموضوع انا صممت برنامج ادارة املاك وعند ميفتح البرنامج لو فيه اي ايجارات متأخرة يفتح تقرير يعرض كل المتأخر المشكلة اني لو مافي متأخرات يفتح التقرير بس فارغ انا ابغي لو مافي اي بيانات بالتقرير مايفتح غير لو بالتقرير بيانات.

وشكرا جزيلا

[محمدنجار]

44 دقائق مضت, moh198511 said:

الموضوع انا صممت برنامج ادارة املاك وعند ميفتح البرنامج لو فيه اي ايجارات متأخرة يفتح تقرير يعرض كل المتأخر المشكلة اني لو مافي متأخرات يفتح التقرير بس فارغ انا ابغي لو مافي اي بيانات بالتقرير مايفتح غير لو بالتقرير بيانات.

::: ارفق قاعد بيانات مصغرة ليتمكن احد مساعدتك ؟

[Shivan Rekany]

44 دقائق مضت, moh198511 said:

الاخوة الافاضل...

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

في البداية اقدم كل الشكر للمنتدى والقائمين عليه في مساعدتنا

الموضوع انا صممت برنامج ادارة املاك وعند ميفتح البرنامج لو فيه اي ايجارات متأخرة يفتح تقرير يعرض كل المتأخر المشكلة اني لو مافي متأخرات يفتح التقرير بس فارغ انا ابغي لو مافي اي بيانات بالتقرير مايفتح غير لو بالتقرير بيانات.

وشكرا جزيلا

اليك هذا
الصقه في محرر فيجوال للتقرير

Private Sub Report_NoData (Cancel As Integer)
  MsgBox "There are no records to report", vbExclamation, "No Records"
  Cancel = True
End Sub

 

[أواب]

جرب هذا الكود   يعمل لدي جيداً

Private Sub Report_NoData(Cancel As Integer)
DoCmd.SetWarnings False
        MsgBox "عفوا لا توجد بيانات"
DoCmd.CancelEvent
End Sub
 

[moh198511]

شكرا جزيلا لاهتمام حضرتك وبفضل الله تم الوصول الي المراد