[ تمت الإجابة ]غلق رسالة تلقائية من الأكسيس واستبدالها برسالة بأخرى

أختي الفاضلة نور هنا

السلام عليكم ورحمة الله وبركاتة

هناك طريقتين لالغاء الرسائل الافتراضية الخاصة ببرنامج الاكسس

الطريقة الاولي وهي الغاء الرسائل الاجرائية وذلك من القائمة

Tools-->Options--> Edit/Find

ثم قومي بالغاء هذا الخيار كما هو موضح بالصورة

بعد ذلك ضعي رسالة بالطريقة البرمجية واكتبي فيها ما تريه مناسبا للمستخدم ومثال علي ذلك

Msgbox "هذا الرقم موجود في حقل رقم الموظف",vbcritical,"رسالة تحذيرية"

ولمعرفة المزيد حول طريقة تصميم الرسائل بطريقة برمجية برجاء متابعة هذه الدروس جيداً

/index.php?showtopic=151140&view=findpost&p=913813

الطريقة الثانية وهي الغاء رسائل الاكسس الافتراضية برمجيا وذلك من خلال هذا الكود ويوضع قبل تنفيذ الامر

DoCmd.SetWarnings False

بعد ذلك نكتب الحدث ونقوم بتفعيل الرسائل مرة أخري

DoCmd.SetWarnings True

مثال علي ذلك

DoCmd.SetWarnings False
DoCmd.OpenQuery "AppendData"
DoCmd.SetWarnings True
X = MsgBox("تم التصدير", vbInformation, "تصدير")

بالتوفيق

شكرا أستاذ محمد

تمت التجربة بنجاح وقمت بإستبدال رسالة الاكسيس برسالة أخرى

-------------------------------------------------

لا زلت أتابع موضوع المخزن وأجتهد فى كل فقرة من فقراته

وسأضع استفسار فى المساء ان شاء الله

أرجو أل يتم غلق تلك الموضوع لأن به إفادة كبيرة جدا لكى من يبحث عن طريقة بناء برنامج للمخزون