كود تجاهل رسائل الاستعلامات الاجرائية

[منتصر الانسي]

اخواني اعضاء المنتدي

هل بالامكان افادتي عن الكود الذي يقوم بإخفاء الرسائل الخاصة بالاستعلامات الجرائية "الحاق, حذف , تحديث" فانا اريد اخفاءها عن طريق الكود وليس عن طريق الخيارات وقد قمت بتجربة الامر Echo بدون فائدة ... مع الشكر لكم جميعا..

[محمد طاهر عرفه]

قبل الاجراء

DoCmd.SetWarnings False

و لا تنسي اعادة تفعيله بعد الاجراء فقد تحتاجه فى مكان آخر

DoCmd.SetWarnings True

[منتصر الانسي]

استاذي العزيز محمد طاهر

افضالك زادت مع الشكر الجزيل لك وربنا يقدرنا على رد الجميل...مع تحياتي,,,

[القناص]

ممكن اغير الرساله التي تضهر لي عند الضغط على

استعلام ( الحاق) او( حذف)

ممكن اغيرها حسب ما اريد..؟

[امير عاطف]

استخدم الكود السابق

تم تعديل يوليو 23, 2004 بواسطه امير عاطف

[القناص]

في البداية اشكرك على الرد ..... ولكن

انا لا اريد الغائه فقط .... واخفائها

انا اريد تعديله ( تعديل الرساله ) التي تظهر ... ممكن ذلك

تم تعديل أبريل 11, 2004 بواسطه القناص

[ابو عبدالرحمن]

طبق ما ذكره الأستاذ أمير عاطف .

ويمكن أن تضع ما تريد من الرسائل باستخدام عبارة

msgbox فمثلا يمكن كتابة السطر التالي بعد سطر تجاهل رسائل الاستعلامات وقبل تشغيل الاستعلام

MsgBox "انتبه أنت على وشك نقل البيانات هل تريد نقلها الآن", , "تنبيه"

وطريقة كتابة الرسائل عموما هي كما يلي:

أولا كتابة msgbox تم القوسين الصغيرين " ثم اكتب العبارة التي تريد خروجها في الرسالة وتغلقها بالقوسين الصغيرين . أي أن العبارة محصورة بين الأقواس الصغيرة .

ثم اضغط الفاصلة التي مع حرف ( و ) العربي ( لابد أن تكون اللغة انجليزية عند ضغط حرف الواو ) . تخرج لك قائمة لاختيار الصورة التي تخرج مع الرسالة وأزرة الأمر المصاحبة لها مثلا : ( موافق و إلغاء الأمر ) وغيرها الكثير . جرب باختيار أشياء مختلفة .

إذا كنت لا تحتاج هذه فاضغط حرف الواو مرة أخرى حتى تختفي .

يمكنك الآن كتابة نص آخر بين قوسين صغيرين لظهوره كعنوان للرسالة على الشريط الأزرق

وهذا أيضا حسب الرغبة حيث يمكنك تجاهلها إن كنت لا تريدها

[القناص]

الله يعطيك العافيه ....ويجزاك بكل خير

هذا ما اريده بالفعل....

[lyla]

هل أستطيع أن أمنع رسايل التأكيد ! يعني لما أعمل مثلا أستعلام ألحقي بتظهر لي رسالة تقول أنت على وشك تشغيل أستعلام ألحاقي مما يؤدي الى تحديث بياناتك . نعم أو لا أو ألغاء . أنا مش عايزة كذه . عايزة مثلا نفذ بدون ذي الرسالة :lol: ... ممكن ! وكيف !

[biskra]

ممكن ذلك عن طريق خاصية قاعدة البيانات في شريط الأدوات:

1 خيارات

2 تخصيص

3 تحرير و بحث

4 تجدين خانات تأكيد أزيلي علامات صح حسب رغبتك.

أظن أن هذا حلا و يمكن أن يتم ذلك عن طريق الكود.

[biskra]

عن طريق الكود يكون كالتالي:

في بداية الكود:

DoCmd.SetWarnings = False

في نهاية الكود:

DoCmd.SetWarnings = true

[lyla]

أخي الكريم فين أكتب الكود ! في النموذج ! وفي خاصية أيه لوتكرمت !

[ابو عبدالرحمن]

ضعي عبارة sql في كود. وضعيه في الحدث الذي تريدين . وفي بداية الكود ضعي السطر الأول وفي نهاية الكود ضعي السطر الأخير

[مصلح الحريصي]

وإذا كنت تفتحين الإستعلام بواسطة زر أمر فظعي الكود التالي في حدث عند النقر للزر

الكود التالي استخدميه إذا كنت تريدين استبدال الرسائل برسائل خاصة بك

        DoCmd.SetWarnings = False
    
    If MsgBox(" الرسالة التي تريدينها أن تظهر ", vbMsgBoxRight + vbYesNo + vbDefaultButton2, "") = vbYes Then
        DoCmd.OpenQuery "أكتبي هنااسم الاستعلام"
        DoCmd.SetWarnings = True
   Else
    MsgBox "الرسالة التي تريدينها أن تظهرعند التراجع عن النسخ ", vbMsgBoxRight, ""
   
    End If

الكود التالي بدون ظهور أي رسائل

        DoCmd.SetWarnings = False
    
        DoCmd.OpenQuery "أكتبي هنااسم الاستعلام"
        DoCmd.SetWarnings = True

[lyla]

الله يخليك ياأخ مصلح دائما سباق لوضع الحلول الله يعطيك العافيه . وياليت تشوف موضوع تكرار السجلات والله محتارة فيه :o ومتوقفه بسببه ولي هو تكرار السجلات. تحياتي