تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] البحث بجزء من الإسم
#1
السلام عليكم ورحمة الله وبركاته
استخدمت طريقة أستاذنا أبو رائد في البحث المتقدم المذكورة في الرابط
http://vb4arb.com/vb/showthread.php?tid=367
ولكن المشكلة أنني لا أستطيع البحث بجزء من الإسم ( مثلاً ) بل لابد من كتابة الإسم كاملاً في مربع البحث .. وهذا متعب ...

عدلت بدل علامة المساواة ( = ) وضعت ( like ) اشتغل الكود بس بكامل الاسم ... حاولت ووضعت % مع الكومات بعد كلمة like بطرق وكيفيات مختلفة ولم أوفق إلى الطريقة الصحيحة ...
كود :
If Me.TextBox2.Text.Trim <> "" Then where &= "AND [req_name] like @req_name "
كود :
If Me.TextBox2.Text.Trim <> "" Then comm.Parameters.AddWithValue("@req_name", Me.TextBox2.Text.Trim)

كيف يمكنني ذلك ...
الرد }}}}
تم الشكر بواسطة:
#2
مثال بسيط جدا
كود :
Imports System.Data.OleDb

Public Class Form1
    Dim str As String = "provider=microsoft.ace.oledb.12.0;data source=|datadirectory|\db.accdb"
    Dim con As New OleDbConnection(str)

    Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
        Try
            Dim ds As New DataSet
            ds.Clear()
            DataGridView1.DataSource = Nothing


            Dim da As New OleDbDataAdapter("select tname,age from tb where tname like'%" & TextBox1.Text & "%'", con)

            da.Fill(ds, "tb")
            DataGridView1.DataSource = ds
            DataGridView1.DataMember = "tb"

        Catch ex As Exception
            MsgBox(Err.Description, MsgBoxStyle.Critical, "")

        End Try

    End Sub

  
End Class
كل مااعرفه في البرمجة تجدونه هنا
الرد }}}}
تم الشكر بواسطة: abulayth
#3
أستاذنا : سعود حفظك الله
شكراً على سرعة التجاوب
ولكن .. ما ذكرته معروف ومعلوم .. طلبي محدد بالصيغة التي ذكرتها بالأعلى لأن لها فوائد عديدة وكما كتب الأستاذ أبو رائد ( طريقة متقدمة في البحث ) ..
كيف أضع المتغيرات % " في الصيغة المذكورة أعلاه .
الرد }}}}
تم الشكر بواسطة:
#4
بصراحة لا ادري
هل يمكن ترفع مثال بسيط يستخدم الطريقة حتى احاول فيه؟؟
كل مااعرفه في البرمجة تجدونه هنا
الرد }}}}
تم الشكر بواسطة:
#5
الحمد لله .. بفضل الله
ثم بفضل عدد من مواضيعكم المتعددة ... توصلت إلى الحل
كود :
If Me.TextBox2.Text.Trim <> "" Then comm.Parameters.AddWithValue("@req_name", "%" & Me.TextBox2.Text.Trim & "%" )
الرد }}}}
تم الشكر بواسطة: ali.alfoly , سعود


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  البحث و فلترة النتائج أحمد فتح الرحمن 3 72 18-11-17, 11:20 PM
آخر رد: أحمد فتح الرحمن
  مساعدة في كود البحث وكود مفاتيح التنقل بين السجلات khaled12345 4 68 18-11-17, 08:10 PM
آخر رد: khaled12345
  [VB.NET] البحث باكثر من قيمة الو0 2 105 17-11-17, 02:26 AM
آخر رد: الو0
  ارجوا المساعدة في كود البحث هدا وجزاكم الله كل الخير محمود العجيلي 8 171 09-11-17, 10:05 PM
آخر رد: مهند بدران
  البحث في الكومبوبوكس nassery99 2 71 01-11-17, 06:42 AM
آخر رد: nassery99
  البحث في datagridview محمود صالح 4 143 31-10-17, 03:55 AM
آخر رد: محمود صالح
  [كود] مساعدة في إكمال كود البحث بأكثر من جدول أبووسم 4 188 22-10-17, 05:46 PM
آخر رد: أبووسم
  [سؤال] احتاج مساعده في البحث gnoonplas 9 237 14-10-17, 04:03 PM
آخر رد: Amir_alzubidy
  مساعدة في كود البحث أبووسم 9 314 08-09-17, 09:44 PM
آخر رد: أبووسم
  [VB.NET] مشكلة البحث بين تاريخيين مبرمج مبتدا 18 567 06-08-17, 08:16 PM
آخر رد: sendbad100

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم