استفسار حول كيفية الغاء التحذير عند تشغيل استعلام التحديث

[ازهر عبد العزيز]

السلام عليكم لدي نموذج (items) يحتوي زر تشغيل استعلام اريد طريقة الغي بها الرسائل التحذيرية عند تشغيل الاستعلام من زر الموجود في النموذج 

333.accdb

[kaser906]

وعليكم السلام

استخدم الحدث التالي

DoCmd.SetWarnings False

DoCmd.OpenQuery "اسم الاستعلام"
DoCmd.SetWarnings True

 

تم تعديل يوليو 2, 2019 بواسطه kaser906

[ازهر عبد العزيز]

@kaser906 استاذ يظهر الخطاء التالي عند عمل الكود

عفوا تمت 

 

[ابو جودي]

DoCmd.SetWarnings (False)
	DoCmd.OpenQuery"U1"
DoCmd.SetWarnings (True)

 

[ازهر عبد العزيز]

أستاذ @kaser906  السبب عندي اسف تمت بنجاح شكرا لك لكن لي تعليق بسيط 

في الحقيقة الخبراء أمثال @kaser906 و @ابا جودى ما اعرف ادعي عليهم او ادعيلهم لان هلكد ما يجابون بسهولة احس نفسي لاشئ لكن شكرا لهم 

[ابو جودي]

4 دقائق مضت, ازهر عبد العزيز said:

أستاذ @kaser906  السبب عندي اسف تمت بنجاح شكرا لك لكن لي تعليق بسيط 

في الحقيقة الخبراء أمثال @kaser906 و @ابا جودى ما اعرف ادعي عليهم او ادعيلهم لان هلكد ما يجابون بسهولة احس نفسي لاشئ لكن شكرا لهم 

تدعى علينا لماذا يا اخى 
لا اله الا الله
الم نقدم المساعدة بقدر المستطاع 

تم تعديل يوليو 2, 2019 بواسطه ابا جودى

[ابو جودي]

شوف يا سيدى  الفاضل السطر الاول 

ايقاف رسائل الاستعلام 

DoCmd.SetWarnings (False)

كود فتح الاستعلام

DoCmd.OpenQuery "اسم الاستعلام"

إعادة الوضع الطبيعى مرة أخرى بتشغيل رسائل الاستعلام

DoCmd.SetWarnings (True)

بعدم وجود السطر الاخير 
لن تظهر رسائل الاستعلام مرة اخرى لهذه القاعدة الا بعد الاغلاق والفتح مرة اخرى

تم تعديل يوليو 2, 2019 بواسطه ابا جودى

[kaser906]

4 ساعات مضت, ابا جودى said:

تدعى علينا لماذا يا اخى

استاذ محمد: إحمل أخاك على سبعين محمل ☺️