[assuhimi]

بسم الله الرحمن الرحيم
هذه رسالة خطأ تظهر لي عند البحث في مربع البحث ومرة بالغلط ضعطت حرف طاء وكان الكيبورد انجليزي
والرمز المقابل له هو علامة التنصيص الواحدة ' 
بعدها ظهر الخطأ وسببه علامة التنصيص في البحث بعد كلمة Like

كود :

from techt where usrname like '%" & (Txtsearch.Text) & "%'

هل يوجد طريقة لتلافي الرسالة لو تم ادخال علامة التصيص في مربع البحث ،، شاكر ومقدر

[ramy alfoly]

كود :

Private Sub TxtName_TextChanged(sender As Object, e As EventArgs) Handles TxtName.TextChanged

       Dim dt As DataTable = nc.daadapt("SELECT * from TechT where usrname Like '%" & Replace(TxtName.Text, "'", "''") & "%'")
       ListBox1.DataSource = dt
       ListBox1.DisplayMember = "usrname"

   End Sub

[assuhimi]

الاخ رامي شكرا لك على سرعة تجاوبك
حاولت لكن يظهر ان الامر cmd يستخدم للادخال ولايقبل البحث بعبارة select from
انا عندي ليست بوكس اقوم بتعبئتها من خلال جدول ويتم الفلترة من خلال حدث التغيير في تكست بوكس

الكود كامل :

كود :

Private Sub TxtName_TextChanged(sender As Object, e As EventArgs) Handles TxtName.TextChanged

       Dim dt As DataTable = nc.daadapt("SELECT * from TechT where usrname Like '%" & TxtName.Text & "%'")
       ListBox1.DataSource = dt
       ListBox1.DisplayMember = "usrname"

   End Sub

---

آسف لم انتبه للتعديل الاخير في ردك ،،
الكود يعمل الان ،، ولكن من باب الفضول ماذا لو اردنا البحث او اضافة اسم يحتوي فعلا على علامة
التنصيص الواحدة '
هل سيحدث خطأ ؟؟ شاكر ومقدر مرورك الكريم