الغاء التعديل والحذف بعد ادخال البيانات

[عبد اللطيف سلوم]

السلام عليكم

مرفق قاعدة البيانات للتعديل عليها

المطلوب عند ادخال المادة وكافة تفاصيل السطر والانتقال الى سطر جديد

يمنع تعديل المادة او حذفها ويمنع تعديل او حذف كافة بيانات السطر

بشرط ان يبقى البحث شغال ولا يتعارض 

ارجو المساعدة فقد عجزت عن حلها

123452025.accdb

[Foksh]

3 ساعات مضت, عبد اللطيف سلوم said:

السلام عليكم

 

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

استخدم في حدث في الحالي الكود التالي :-

    If Me.NewRecord Then
        Me.AllowAdditions = True
        Me.AllowEdits = True
        Me.AllowDeletions = True
    Else
        Me.AllowEdits = False
        Me.AllowDeletions = False
    End If

 

وفي حدث بعد الإضافة للنموذج الحدث التالي :-

Private Sub Form_AfterInsert()
    Me.AllowEdits = False
    Me.AllowDeletions = False
End Sub

 

ملفك بعد التطبيق :-

 

 

 

123452025.zip