كيف امنع تكرار ادخال اسم في textbox

أخي قم بعمل إستعلام عن الاسم المراد إدخاله ثم بعد ذلك افحص عدد السجلات فإن كانت صفراً هذا يعني أنه ليس موجود والعكس صحيح

بسم الله الرحمن الرحيم

المطلوب هو ليس استعلام الاسم موجود بالفعل ام لا؟

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

اتمن ان اكون قد اوضحت المطلوب.

شكراااااااااااااااااااا

اخي العزيز

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

-----------------------------------------------------------------------------

SQL = "select * from TabelName where name = '" & Text1.Text & "'"

Re.Open SQL, Connection, adOpenDynamic, adLockReadOnly

If Re.EOF And Re.BOF Then

قم بكتابة هنا جملة لإدخال بتاعتك عادية خالص اللي هى insert into

else

msgbox "هذا الإسم تم إضافته من قبل"

end if

-----------------------------------------------------------------------------

شرح الكود

--------

جملة الإستعلام الأولى هي عبار عن انه سوف يختار كل اللي في الجدول بتاعك بشرط انه يحتوي على الكلمة اللي مكتوبة في text1 معايا ؟

جملة if معناها اذا كان نهاية الملف نساوي بداية الملف اللي هو الجدول يعني

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

اما كلمة else

فهو بالطبع وجد الكلمة المكتوبة في التيكست 1 وبذلك تحقق الشرط وبذلك سوف يظهر رسالة اللي انت هاتكتبها بيديك كما انا كاتبه

وبكدة انتهت المشكلة

خلي بالك

انت لازم تعمل الحكاية دي وبالذات اذا كان الجدول بتاعك يحتوي على مفتاح اساسي في حقل الأسماء

لانه سوف يحدث خطأ غير مرغوب فيه

باي

اذا لم تفهم شئ قل لي

شكراً للأخ MohamedAliSalim فقد أوضح ما كنت أريد قوله بالأكواد شكراً لك أخي ...

شكرا للاخوة