PDA

View Full Version : سوال: Delete Query پيام نشان ندهد


هادی2020
دوشنبه 07 مرداد 1387, 10:51 صبح
سلام چطور ميشه از نشان دادن پيام در هنگام اجراي يه Delete Query جلوگيري كرد
و خودمان يه پيام نشان بدهيم
مهدی قربانی
دوشنبه 07 مرداد 1387, 10:59 صبح
سلام
دوست عزيز سئوالتون تكراريه ، يك كامند باتون روي فرم ايجاد كنيد كه كارش اجراي كوئري Delete مورد نظر باشه و از طرفي در محيط كد نويسي قبل و بعد خط مربوط به باز كردن كوئري setwarnings رو False و True‌ كنيد :


DoCmd.SetWarnings False
.
DoCmd.SetWarnings True
mohammadgij
دوشنبه 07 مرداد 1387, 11:02 صبح
روش آقاي قرباني گل درسته

و پيام


DoCmd.SetWarnings False
Dim intMsgb As Integer
intMsgb = MsgBox("آيا مايل به حذف ركورد جاري مي باشيد", vbYesNo + vbCritical, "توجه")
If intMsgb = vbYes Then
DoCmd.OpenQuery "QueryName"
End If
DoCmd.SetWarnings True