تقييم الموضوع :
  • 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 , سعود


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  البحث الشامل في جميع اعمدة كيف يتمListView nmst70 8 111 منذ 2 ساعة مضت
آخر رد: مساعدة
  [سؤال] استفسار بخصوص انواع كود البحث.. Marwan9990 2 187 21-03-17, 05:01 PM
آخر رد: zinab ali
  [سؤال] استفسار عن كود البحث المتعدد Marwan9990 18 319 02-03-17, 09:19 AM
آخر رد: Marwan9990
  استفسار حول كود البحث المتعدد حسب الاصناف oman 5 161 28-02-17, 09:58 PM
آخر رد: Marwan9990
  البحث بجزء من التاريخ أسامة السالمي 6 171 16-02-17, 03:19 PM
آخر رد: أسامة السالمي
  [VB.NET] البحث التلقائي tifagreet 1 126 30-01-17, 06:07 PM
آخر رد: مساعدة
  البحث قى listbox Mohamed20 1 127 27-01-17, 07:12 AM
آخر رد: مساعدة
  [VB.NET] مساعدة في نقل الصنف من شاشه البحث الي فاتوره الشراء gmailali 6 262 24-01-17, 08:32 PM
آخر رد: gmailali
  [VB.NET] طلب تعديل كود بحث من البحث في الاكسس الى البحث بالسكيول وشكراً m22sf 3 160 22-01-17, 01:39 PM
آخر رد: thevirus
  [VB.NET] كيف يتم البحث فى ليست فيو موجودة فى فورم اخر الماجيك مسعد 15 405 19-01-17, 08:33 PM
آخر رد: الماجيك مسعد

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


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