سؤال عن عدم تكرار ال Data داخل قاعدة البيانات

السلام عليكم

عليك بالتصميم الجيد لقاعدة البيانات

و اجعل رقم العميل مثلا المفتاح الاساسي PK للجدول

و عن ادخال البيانات للجدول قم اولا بالبحث عن الرقم المدخل فاذا وجد

ترسل الرساله بان هذا الرقم موجود مسبقا و إلا تواصل في ارسال البيانات لقاعدة البيانات

افضل طريقة للبحث في مثل هذه الحالات ان يكون في حدث الـ LostFocus لصندوق النص المخصص لرقم العميل .

الأخ الفاضل / إبراهيم الطيب

لاحظ أني سألت عن طريقة برمجية يعني من خلال الكود ، ولم أسأل عن طريقة ذهنية مفترض القيام بها لدى تصميم قاعدة البيانات .

مع تحياتي لك .

السلام عليكم

طيب ايه رائك في :

5  SQL = "select * from Tbl_Customers  where stuno = " & Text1.Text & ""
6  Set rs = db.OpenRecordset(SQL, 2)
7  If Not rs.RecordCount < 1 Then
    MsgBox "عفواً هذا الرقم  موجود مسبقاً بقاعدة البيانات  "
    Exit Sub
  End If

اذا كنت تستخدم data control فان الكود التالي يمكن ان يفي بالغرض

ضعه في زر أمر

do while not data1.recordset.eof
if data1.recordset.field("customer_name")=" & text1.text & " then
msgbox "the customer:" & " " & text1.text & " " & "is already in database"
end if
data1.recordeset.movenext
loop

اما اذا كنت تستخدم ado فقط استبدل data1 بسم الاداة