كود MsgBox

[REDA.M.A]

الاخوه الكرام

السلام عليكم

الموضوع عندي صعب و ارجو المساعد  وهي  عند  الضغط على  فتح استعلام تحديث  اريد ظهور  (  MsgBox  )  بنعم او الغاء    ولو كان فى مثال بيسط للموضوع بكون شااااااااااااااااااااكر . تحياتى

[Barna]

استعمل هذا الكود !!!!

Dim Warning As String
Warning = MsgBox("أنت الآن على وشك التحديث فهل أنت واثق من رغبتك في التحديث", vbYesNo + vbQuestion, "تحذير")
If Warning = vbYes Then
DoCmd.SetWarnings (False)
    
ضع هنا استعلام التحديث المطلوب

DoCmd.SetWarnings (True)
Else
DoCmd.CancelEvent
End If

 

[REDA.M.A]

استاذ محمد

السلام عليكم

اشكرك جدا و اتمناه عدم الازعاج  ممكن لو تكرمت  التطبيق  و تعديل على المثال المرفق لان اخوك حاول و لم يفلح  و اسف على الازعاج 

ربنا يكفيك شر المرض

تشغيل استعلام تحديث و اظهر تنبيه.rar

[kha9009lid]

24 دقائق مضت, REDA.M.A said:

لو تكرمت  التطبيق  و تعديل على المثال المرفق لان اخوك حاول و لم يفلح  و اسف على الازعاج 

بعد اذن اخي محمد جرب المرفق

 

تشغيل استعلام تحديث و اظهر تنبيه.accdb

[REDA.M.A]

استاذي المحترم  kha9009lid

السلام عليكم

تحياتى لحضرتك و اشكرك من كل قلبي و ربنا يحميك و يبعد عنك كل شر و يكفيك شر المرض --- كما اشكر المحترم / محمد                                        هذا هو المطلوب  . تحياتى

تم تعديل يونيو 12, 2020 بواسطه REDA.M.A