البحث في الموقع
Showing results for tags 'opening reports'.
تم العثور علي 1 نتيجه
-
السلام عليكم ورحمة الله وبركاته اساتذتي الافاضل استعملت هذا الكود لفتح تقرير rptCustomers Option Compare Database Dim rpt As Report Private colReports As New Collection Private mintrpt As Integer Private Sub CommandOpenReports_Click() Set rpt = New Report_rptCustomers colReports.ADD Item:=rpt, Key:=rpt.hwnd & "" mintrpt = mintrpt + 1 rpt.Caption = mintrpt rpt.Visible = True End Sub فيفتح التقرير ثلاث مرات ثم تظهر هذه الرسالة بانه لا يمكن فتح اس قواعد بيانات اخرى كما في الصورة مع اني استعمل نفس الكود لفتح نموذج فيفتح لي نفس النموذج لاكثر من عشرة نماذج
