في معرض ردها على أحد الزملاء
وضعت الأخت زهرة مشكورة
كود رائع
وظيفته المطالبة بكلمة مرور على تعديل البيانات
يتم وضعه في النموذج
في حدث قبل التحديث
وهذا هو الكود:
Private Sub Form_BeforeUpdate(Cancel As Integer)
If Me.NewRecord Then
Else
If Me.Dirty Then
If InputBox("الرجاء ادخال كلمة السر لتعديل البيانات", "تعديل البيانات") = "123" Then
Me.AllowEdits = True
Else
MsgBox "عفوا .. كلمة السر خاطئة ", vbOKOnly + vbCritical, "خطأ في كلمة السر"
Me.Undo
End If
End If
End If
End Subالسؤال:
هل يمكن تطوير هذا الكود بحيث يطالب بكلمة المرور عند تعديل البيانات أو عند حذفها ( حذف سجل )
بدل أن يقتصر وظيفته على حالة التعديل فقط
هذا أولا
ثانيا:
هل يمكن أن يتضمن هذا الكود إستثناءً لحقل معين
بمعني أنه يمنع أي تعديل على البيانات بدون إدخال كلمة المرور
بإستثناء التعديل على حقل واحد معين؟
لكم شكري وإمتناني مقدما.

