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

[moh198511]

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

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

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

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

وشكرا جزيلا

[محمدنجار]

  في 5‏/4‏/2017 at 11:58, moh198511 said:

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

Expand  

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

[Shivan Rekany]

  في 5‏/4‏/2017 at 11:58, moh198511 said:

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

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

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

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

وشكرا جزيلا

Expand  

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

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]

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