بسم الله الرحمن الرحيم
السلام عليكم
لدي جدولين بينهما ارتباط، عند محاولة حذف احدى القيم ، تظهر رسالة من الاكسس تفيد بعدم امكانية الحذف بسبب وجود ارتباط
قمت بتصميم شاشة تتلائم مع سياق شاشات البرنامج، تفيد بعدم امكانية الحذف بسبب وجود الارتباط
المشكلة:
كلا الشاشتين ( الشاشة التي قمت بتصميمها والشاشة الصادرة كتحذير من برنامج الاكسس ) تظهران معا
كيف يمكن الغاء شاشة الاكسس والابقاء على شاشتي !!!
ارجو تعديل المثال المرفق
والف شكر
تم تعديل هذه المشاركة بواسطة kafi في 28 يوليو 2012 في 11:26
up
السلام عليكم
للتوضيح اكثر
ان بند الفواتير هو الوحيد الذي لديه تفرعات جزئية
الرجاء تحديد ذلك البند ثم الضغط على زر Delete من لوحة المفاتيح، وملاحظة كيفية ظهور رسالة الاكسس ( التي ارغب بشدة بمنع ظهورها) مع ظهور الشاشة المصممة من قبلي
ارجو تعديل المثال المرفق نظراً للاهمية
والف شكر
تفضل اخي الكريم
ملفك بعد التعديل
طريقة الحل :
يجب استبعاد فرض التكامل المرجعي لكي تتمكن من عدم اظهار رسالة التنبيه
هذا الإجراء لن يؤثر على العلاقات فهي قائمة وموجوده ( رأس بأطراف )
ايضا سوف نقوم بإضافة هذا الكود في حدث عند الحذف
Me.AllowDeletions = False
مهمة هذا الكود عدم السماح بالحذف في حالة كانت هناك سجلات مرتبطة ( مثل سجل الفواتير )
اخيرا سنضع هذا الكود في حدث عند اغلاق النموذج الخاص بالتنبية ( ان الحذف غير ممكن )
DoCmd.Close acForm, "Fixed_Gen_Expenses_List" DoCmd.OpenForm "Fixed_Gen_Expenses_List"
مهمة هذا الكود هو انعاش سجلات النموذج بعد اغلاق نموذج التنبيه
بالتوفيق
الف الف شكر
اخت زهرة على اجابتك وعلى هذا الشرح المدعم بالصور
بارك الله فيك
