الغاء رسالة تشغيل استعلام الالحاق

[husseinharby]

الاخوة الافاضل خبراء المنتدي 

 

اريد الغاء هذه الرسالة التي تظهر عند تشغيل استعلام الالحاق اكثر من مرة 

او استبدالها برسالة اخري مثل ... هل تريد حفظ التغييرات

[ابو ياسين المشولي]

ضع الامر في الوسط

DoCmd.SetWarnings False
هنا ضع امر الكود
DoCmd.SetWarnings True
 

[عبد الله قدور]

السلام عليكم

من خيارات اختر اتبع الخطوات في الصورة

وبعدها يمكنك استخدام الامر msgbox  لتنفيذ رسالة تحذير قبل تنفيذ الاستعلام.

Dim a As Single
a = MsgBox("هل تريد حذف المنطقة " & Me.ArName, vbDefaultButton1 + vbMsgBoxRight + vbExclamation + vbYesNo, "تنبيه")
If a = vbYes Then
هنا ضع كود تشغيل الاستعلام
End If

 

[husseinharby]

شكرا لكم