حذف سجل

هل من الممكن أن تنزل الملف الذي فيه المشكلة ؟

أو على الأقل الكود الخاص بالزر إذا لم يمكنك ذلك .

لكن مبدئيا هل النموذج من خصائصه السماح بالحذف ؟

إنشء زر وضع هذا الكود فيه . في حدث عند النقر للزر

Dim strMsg As String, strTitle As String

Dim strMsgNo As String, strTitleNo As String

strMsg = "هــــل تـريـــد حـــذف هــــذا الصنــــــف .....؟"

strTitle = " تأكيد الحذف"

If MsgBox(strMsg, vbQuestion + vbYesNo + vbDefaultButton2, strTitle) = vbYes Then

DoCmd.SetWarnings False

On Error Resume Next

DoCmd.RunCommand acCmdDeleteRecord

End If

مع تغيير ما يلزم عندك

أشرف خليل

اشكركم جميعا اخي العزيز حارث و ashraf

الاخ حارث خصائص النموذج السماح بالحذف نعم .

الاخ العزيز ashraf.

جربت الكود حقك ويعمل بشكل ممتاز .

تحياتي وتقديري للجميع