23-09-18, 09:25 PM
مرحباً اخى rizakflash8
تعديل بسيط فقط على الكود
حتى يتم تنفيذ ما تريد تنفيذه وكما تم طلبه فى موضوعك
كود :
Dim dv As New DataView(dtTypee)
dv.RowFilter = String.Format("name like'%{0}%'", TextBox1.Text)
If dv.Count <> 0 Then
MsgBox("الصنف مسجل مسبقاً")
Else
dv.RowFilter = String.Format("name like'%{0}%'", TextBox1.Text.Replace(Space(1), ""))
If dv.Count <> 0 Then MsgBox("الصنف مسجل مسبقاً")
End Ifفقط عدل كلمة name باسم العمود الذى يحتوى على الاسماء المطلوب البحث فيه
اتمنى ان يكون الكود بسيط وواضح لك
الكود وظيفته سيقوم بالبحث فى كود الاستعلام الذى سبق وقمت به
وعند ايجاد قيمة فى البحث سيقوم بعرض رسالة توضح بان الاسم موجود
لكن تذكر اذا كان السم مثلاً مسجل مثل samsung s5
وقمت انت بالبحث باسم samsung أو s5 او لو كان حرف واحد سيقوم بعرض الرسالة
ولتجنب ذلك ويتم البحث بالتطابق الكلى وليس الحرفي
فقط استبدل
كود :
"name like'%{0}%'", TextBox1.Textبالكود التالى
كود :
"name ='{0}'", TextBox1.Textوايضاً استبدل
كود :
"name like'%{0}%'", TextBox1.Text.Replace(Space(1), "")بالكود التالى
كود :
"name ='{0}'", TextBox1.Text.Replace(Space(1), "")تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]
ساهم دائماً فى
لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله
▼ شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]
ساهم دائماً فى
لكل من يقوم بالمساهمةفى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله
▼ شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية

