اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

الردود الموصى بها

قام بنشر

السلام عليكم

أريد كود لمنع حذف كافة السجلات في طريقة عرض النماذج المستمرة

سواء بتحديد كافة السجلات عن طريق ضغط اختصار الكيبورد Ctrl+A  ثم زر DELETE حذف كافة السجلات

أو  بتحديد كافة السجلات عن طريق ضغط اختصار الكيبورد Ctrl+A  ثم اختصار Ctrl+X قص كافة السجلات

 

والابقاء على حذف السجلات واحد واحد فقط

وجزاكم الله خيراً

Undeletion.rar

قام بنشر

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

هل جربت تغيير (محددات السجلات) الى لا

عند تغييرها لا تستطيع تحديد الكل

فقط السجل الذي عليه المؤشر هو القابل للحذف

::

تحياتي

 

قام بنشر

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

 

وشكراُ

قام بنشر

جميل السؤال

هناك اكثر من فكرة

يمكن ايسرها التالي

ضع خاصية تمكين الحذف للنموذج = لا

والامر خلف الزر يكون جملة حذف sql  والشرط قيمة السجل الحالي وطبعا يستخدم قيمة الحقل الفريد ! 

ولا حظ ان االسجل الحلي هو الذي يظهر عنده مؤشر محدد السجلات وعادة يكون اول سجل في السجلات المحددة

بالتوفيق

 

  • Like 1
قام بنشر

جميل التنفيذ كذلك اخ مستر ستيف

اتمنى ان هذا ماتريد؟

بالتوفيق

  • 2 weeks later...
قام بنشر

السلام عليكم 

كيف يمكنني الرجوع أو نقل التركيز إلى السجل السابق بعد عملية الحذف وبعد أمر Me.Requery تحديداً

 

لقد قمت بهذه المحاولة لكن في بعذ الأحيان لا تنجح  في نقل التركيز للسجل السابق بعد الحذف

وذلك حصراً إذا كانت الأرقام غير متسلسلة أي كأن يكون أرقام السجلات 1-2-5-6-10-11-12-13....

 فيرجى منكم التعديل وشكراً

 

 

Undeletion.rar

قام بنشر

جزيت خيرا للحل السابق

لكن هناك طلب آخر لو تكرمت،، ماذا لو كان النموذج الذي أحذف منه السجلات نموذج فرعي ؟؟

عندما قمت بالمحاولة أصبح يظهر لي رسالة أن النموذج الفرعي غير مفتوح

فما الحل برأيك؟؟؟ جزاك الله خيرا

Undeletion.rar

قام بنشر

سطر الذهاب للسجل السابق سيكون بهذا الشكل

DoCmd.GoToRecord , , acGoTo, a - 1

بالتوفيق

  • Like 1

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information