zoom10 قام بنشر مايو 10, 2019 مشاركة قام بنشر مايو 10, 2019 السلام عليكم ورحمة الله وبركاته عند الضغط على زر ( عرض تقرير السلعة ) وهي غير معروضة بياناتها في الحقول تظهر هذه الرسالة وهذا طبيعي لأن البيانات ليست معروضة . سؤالي كيف استطيع تغيير هذه الرسالة أو إخفاءها عن المستخدم لأن فيها إمكانية الولوج إلى أكواد البرمجة في حال قام بالضغط على Debug. وهذا هو كود الزر : Private Sub أمر12_Click() Dim stLinkCriteria As String stLinkCriteria = "[ID] =" & Me![ID] DoCmd.OpenReport "TG", acViewPreview, , stLinkCriteria End Sub ودمتم رابط هذا التعليق شارك More sharing options...
essam rabea قام بنشر مايو 10, 2019 مشاركة قام بنشر مايو 10, 2019 13 دقائق مضت, zoom10 said: سؤالي كيف استطيع تغيير هذه الرسالة أو إخفاءها عن المستخدم لأن فيها إمكانية الولوج إلى أكواد البرمجة في حال قام بالضغط على Debug. غير الكود الى On Error Resume Next Dim stLinkCriteria As String stLinkCriteria = "[ID] =" & Me![Id] DoCmd.OpenReport "TG", acViewPreview, , stLinkCriteria 2 1 رابط هذا التعليق شارك More sharing options...
عبد اللطيف سلوم قام بنشر مايو 10, 2019 مشاركة قام بنشر مايو 10, 2019 جرب اكتب قبل الكود on error resume next احتمال تختفي وما عاد تظهر 2 1 رابط هذا التعليق شارك More sharing options...
kanory قام بنشر مايو 10, 2019 مشاركة قام بنشر مايو 10, 2019 جرب هذا ..... Private Sub أمر12_Click() On Error GoTo err_أمر12_Click Dim stLinkCriteria As String stLinkCriteria = "[ID] =" & Me![ID] DoCmd.OpenReport "TG", acViewPreview, , stLinkCriteria exit_أمر12_Click: Exit Sub err_أمر12_Click: If Err.Number = 3075 Then MsgBox "ضع رسالتك هنا" Resume exit_أمر12_Click Else MsgBox Err.Number & vbCrLf & Err.Description End If End Sub 4 1 رابط هذا التعليق شارك More sharing options...
zoom10 قام بنشر مايو 10, 2019 الكاتب مشاركة قام بنشر مايو 10, 2019 بارك الله فيكم وفي علمكم - سلمت أخي الكريم essam rabea دائما حاضر بالإجابة . أكرر شكري وتقديري لك . - سلمت أخي عبد اللطيق أيضا ولك مني جزيل الشكر على ردك . - بارك الله فيك أخي kanory كانت هي الإجابة الرائعة وكل الإجابات رائعة . ولكن إضافتك للكود Msgbox لتنبيه المستخدم بأن البيانات خالية كانت جميلة جدا . رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.