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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  استخدام كود البحث ثم عند عدم وجود نتيجة في الداتا جريدفيو تظهر رسالة Hazem1 11 196 19-09-18, 07:00 PM
آخر رد: elgokr
  [VB.NET] ملأ الكومبوبكس اثناء الكتابة عليه و items تأخذ من البحث larbihamri 21 467 03-09-18, 06:14 AM
آخر رد: elgokr
  [سؤال] مشكلة في الكود في كيفية البحث داخل الداتا جريد من خلال صندوق نصي ؟ dametucorazon 1 99 02-09-18, 10:26 AM
آخر رد: elgokr
  طلب مساعدة في كود البحث بالتاريخ وبمربع تكست وعرض البيانات بالتكست والداتا جريد essawq 12 365 02-09-18, 03:22 AM
آخر رد: elgokr
  [VB.NET] استفسار :- البحث في textbox - Contains dubai.eig 9 274 30-08-18, 07:08 PM
آخر رد: elgokr
  البحث للتاريخ بالتاكس بكس العيدروس 5 146 26-08-18, 09:57 PM
آخر رد: elgokr
  [سؤال] كود البحث بالتاريخ عقدني هل من مساعدة بكود البحث بالتاريخ vb.net and sql essawq 3 162 04-08-18, 04:01 PM
آخر رد: aljzazy
  البحث في الداتاقريدفيو المتألق9 2 134 31-07-18, 07:40 AM
آخر رد: GameOver
  [VB.NET] كيف يمكنني ان اسند نتيجة البحث الى التكست بوكس larbihamri 9 264 29-07-18, 07:18 PM
آخر رد: larbihamri
  [VB.NET] البحث بالاجراءات المخزنة محمد اسماعيل 7 199 12-07-18, 09:46 PM
آخر رد: ابراهيم ايبو

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


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