تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[كود] كود البحث عن الاسم
#1
السلام عليكم ورحمة الله وبركاته
يا جماعة الخير
كنت عايز كود مثلا لو عايز أبحث عن اسم إسلام
يطلعلي الاسم حتى لو مكتبتش الهمزة
الرد
تم الشكر بواسطة: asemshahen5 , asemshahen5
#2
اين انتم يا جماعة الخير
الرد
تم الشكر بواسطة: asemshahen5
#3
لا تستعجل على رزقك
ولكن التعامل في البحث سيكون بحروف مختلفه
الرد
تم الشكر بواسطة: أبووسم , asemshahen5
#4
مشكلة اللغة العربية في البحث هو ان الكمبيوتر سوف يفترض ان حرف أ مختلف عن الحرف إ مختلف عن الحرف ا
لذلك انت تحتاج اولا الي مصفوفة يكون بها بعض الحروف التي سوف تستخدم لمقارنة البيانات
حتي تستطيع عمل Validation للكلمات المراد البحث عنها
الرد
تم الشكر بواسطة: هاوي1995 , asemshahen5
#5
نفرض ان التكست الخاص بالبحث = TextBox1
اسم الجدول = tpl1
حقل الاسم = username


كود :
For Each s As String In TextBox1.Text 
     s = Regex.Replace(s, "[أإآا]", "[أإآا]") 
     s = Regex.Replace(s, "[هة]", "[هة]") 
     s = Regex.Replace(s, "[ىي]", "[ىي]") 
     s = Regex.Replace(s, "[وؤ]", "[وؤ]") 
   txt &= s 
SQL = "select * from tpl1 where username like '%" & txt & "%'" 
Next
الرد
#6
بعد تطبيق الكود لا يعمل
الرد
تم الشكر بواسطة: asemshahen5
#7
ارفق مثال للتعديل عليه .
الرد
تم الشكر بواسطة: asemshahen5
#8
(08-10-16, 03:30 PM)حريف برمجة كتب : ارفق مثال للتعديل عليه .

مرفق مثال أخي


الملفات المرفقة
.rar   aaaaa.rar (الحجم : 80.3 ك ب / التحميلات : 48)
الرد
تم الشكر بواسطة: asemshahen5
#9
الجدول TB_cust
حقل الاسم cust_name



كود :
"Select * from TB_cust where Cust_name Like  '%" & Trim(TextBox2.Text) & "%'"


test and tell me
الرد
تم الشكر بواسطة: asemshahen5 , asemshahen5
#10
(08-10-16, 05:12 PM)المبرمج العبقري كتب :
(08-10-16, 03:30 PM)حريف برمجة كتب : ارفق مثال للتعديل عليه .

مرفق مثال أخي

الصق الكود كامل للبوتن 1


كود :
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        If RadioButton2.Checked = True Then
            DataAdapter1 = New OleDbDataAdapter("Select * From table1 Where id Like '%" & Trim$(TextBox1.Text) & "%'", Conn)

        ElseIf RadioButton1.Checked = True Then

            For Each s As String In TextBox1.Text
                s = Regex.Replace(s, "[أإآا]", "[أإآا]")
                s = Regex.Replace(s, "[هة]", "[هة]")
                s = Regex.Replace(s, "[ىي]", "[ىي]")
                s = Regex.Replace(s, "[وؤ]", "[وؤ]")
                Dim txt As String = s

                DataAdapter1 = New OleDbDataAdapter("Select * From table1 Where name Like '%" & txt & "%'", Conn)
            Next

        End If

        Dim i As Integer
        On Error Resume Next
        i = DataGridView1.CurrentRow.Index
        TextBox_view.Text = DataGridView1.Item(1, i).Value

        DataSet1.Clear()
        DataAdapter1.Fill(DataSet1, "table1") ' انبحث بأستخذاوالرقم

        DataGridView1.DataSource = DataSet1
        DataGridView1.DataMember = "table1"
        DataGridView1.Refresh()
    End Sub
الرد
تم الشكر بواسطة: المبرمج العبقري , asemshahen5 , asemshahen5


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  كود البحث بين تاريخين في Report Viewer بالفيجوال بيسك adnan gharbi 9 301 04-06-20, 02:59 PM
آخر رد: adnan gharbi
  البحث بتاريخ اليوم في الدتا جريد فيو mazentq 5 242 27-05-20, 08:36 PM
آخر رد: rochdi191
  [VB.NET] إظهار جدول آخر يحمل البيانات عن طريق البحث من خلية في داتاغريد Alhootti1 2 176 06-05-20, 04:46 AM
آخر رد: Alhootti1
  [VB.NET] كيف اقضي على مشاكل الكود البحث ةالاضافة و التعديل بالعربية في فيجوال بيسك rochdi191 5 227 01-05-20, 04:26 PM
آخر رد: rochdi191
  [كود] رمضان مبارك يا اخوتي اريد كود بحث عن الاسم لقد اتعبني البحث rochdi191 8 265 25-04-20, 11:32 PM
آخر رد: rochdi191
  تحديد نتيجة البحث ZaerAllail 9 338 01-04-20, 10:54 PM
آخر رد: سعود
  حل مشكله البحث في ال datagrid mohamedalqadi 2 216 17-03-20, 06:51 PM
آخر رد: mohamedalqadi
  [VB.NET] البحث عن اي جزء من أي كلمة في مربع نص واحد waelalmsry75 9 2,423 13-03-20, 02:49 AM
آخر رد: waelalmsry75
  عرض معلومات DataGridView في فورم أخر عند الضغط على الاسم aldery 8 464 28-02-20, 07:23 AM
آخر رد: alshandodi
  البحث بناءً على شرطين mr_hso 6 323 26-02-20, 11:30 AM
آخر رد: mr_hso

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


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