اعضاء المنتدى الاعزاء
السلام عليكم ورحمه الله وبركاته
استخدام هذا الكود لعدم تكرار اسم العميل فى الجدول العملاء لكن لا يعمل بشكل صحيح
If (Eval("DLookUp(""[CustomerName] "",""[Customers]"",""[CustomerName]=form![CustomerName]"") Is Not Null")) Then
MsgBox "اسم العميل مكرر أو سبق تسجيله من قبل ", vbInformation + vbMsgBoxRight, "االبرنامج"
DoCmd.GoToControl ("CustomerName")
Exit Sub
End If