ابو فتحى قام بنشر ديسمبر 20, 2021 قام بنشر ديسمبر 20, 2021 اعضاء المنتدى الاعزاء السلام عليكم ورحمه الله وبركاته استخدام هذا الكود لعدم تكرار اسم العميل فى الجدول العملاء لكن لا يعمل بشكل صحيح If (Eval("DLookUp(""[CustomerName] "",""[Customers]"",""[CustomerName]=form![CustomerName]"") Is Not Null")) Then MsgBox "اسم العميل مكرر أو سبق تسجيله من قبل ", vbInformation + vbMsgBoxRight, "االبرنامج" DoCmd.GoToControl ("CustomerName") Exit Sub End If
ابو فتحى قام بنشر ديسمبر 20, 2021 الكاتب قام بنشر ديسمبر 20, 2021 هل يوجد كود لمنع تكرار الاسم فى الجدول
ابو فتحى قام بنشر ديسمبر 20, 2021 الكاتب قام بنشر ديسمبر 20, 2021 للاسف مش عارف رفع القاعده البيانات عشان كبير
طاهر الوليدي قام بنشر ديسمبر 21, 2021 قام بنشر ديسمبر 21, 2021 اخي اعرض الجدول في وضع تصميم اشر على الحقل اسم عميل ومن خصائص الحقل تجد بيانات اولها تنسيق والثامن كلمة مفهرس امامه اختر نعم التكرار غير مقبول وخرج وقم بالحفظ حسب مافهمت من سؤالك
ابو فتحى قام بنشر ديسمبر 21, 2021 الكاتب قام بنشر ديسمبر 21, 2021 اخى العزيز طاهر اولا : شكرا على الرد و الاهتمام ثانيا : قاعده البيانات sql و ليس اكسيس ثالثا : هل ممكن عمل هذا التنسيق على جدوال sql
ابو جودي قام بنشر ديسمبر 21, 2021 قام بنشر ديسمبر 21, 2021 dim stLinkCriteria As String:stLinkCriteria = "[Fildename]=" & Me.txtObjectName If DCount("*", "tblName", stLinkCriteria) > 0 Then MsgBox$("type You Want") End If مع الاخذ فى الاعتبار نستخدم ذلك مع الارقام' stLinkCriteria = "[Fildename]=" & Me.txtObjectName نستخدم ذلك مع النصوص' stLinkCriteria = "[Fildename] ='" & Me.txtObjectName & "'" نستخدم ذلك مع التواريخ' stLinkCriteria ="[Fildename] =#" & Me.txtObjectName & "#" وفى هذا الموضوع تم استخدام الكود السابق
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.