تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] البحث في جدولين
#1
السلام عليكم

عندي كود استخدمة للبحث في جداول مرتبطة مع بعض راس براس الجدول الاساسي tb1  والجدول الثاني tb2


الكود يبحث ويفلتر ولكن يبحث في الجدول الاول فقط ويحذف بيانات الجدول الثاني لاتظهر مع ان كود الملا وضعت الجدولين

انا ببحث عن قيمة  بعمودين في الجدول الاول

كود البحث

كود :
 Try
         
           If IsNumeric(TextBox1.Text) = False Then

               Dim DataAdapter As New OleDbDataAdapter("SELECT * FROM tb1 WHERE tb1.clien_mail  LIKE '" & Trim$(TextBox1.Text) & "%' or tb1.model_mail like '" & Trim$(TextBox1.Text) & "%'", con)
               con.Open()
               DataSet1.Clear()
               DataAdapter.Fill(DataSet1, "tb1,tb2")
               con.Close()
               If Me.BindingContext(DataSet1, "tb1,tb2").Count = 0 Then
                   MsgBox("لم يتم العثور على شيء", 48 + MsgBoxStyle.MsgBoxRight, "البحث")

                   TextBox1.Text = ""

                   con.Close()

                   Exit Sub
               Else
                   DataSet1.Clear()
                   DataAdapter.Fill(DataSet1, "tb1,tb2")
                   count()

                   Exit Sub

               End If

           End If
       Catch ex As Exception
           MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
       End Try

كود الاتصال وملا ءالبيانات



كود :
  Dim cmd As OleDbCommand = New OleDbCommand("SELECT tb1.ID_mail ,tb1.clien_mail, tb1.model_mail, tb2.probl_acce,tb2.main_acce,tb2.typ_acce  FROM tb1, tb2 where tb1.ID_mail = tb2.ID_acce", con)
       con.Open()
       DataAdapter1 = New OleDbDataAdapter(cmd)
       Dim builder As OleDbCommandBuilder = New OleDbCommandBuilder(DataAdapter1)
       DataSet1 = New DataSet()
       DataAdapter1.Fill(DataSet1, "tb1,tb2")
       DataGridView1.DataSource = DataSet1
       DataGridView1.DataMember = "tb1,tb2"
       con.Close()
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [SQL] مطلوب تعديل كود الاستعلام من جدولين غير مرتبطين فراس الغزي 10 247 18-01-19, 11:05 PM
آخر رد: asemshahen5
  أكواد البحث في السجلات والحقول ZaerAllail 0 63 14-01-19, 12:13 AM
آخر رد: ZaerAllail
  [سؤال] كيفية البحث داخل حقل تيكست عن كلمة بداخله والمقارنة dametucorazon 3 134 09-01-19, 11:29 AM
آخر رد: dametucorazon
  [سؤال] البحث بالداتاجريدفيو allo5_800 4 170 24-12-18, 09:32 AM
آخر رد: allo5_800
Rainbow [كود] البحث عن سجل بين تاريخين اسامه الهرماوي 6 206 20-12-18, 03:19 PM
آخر رد: اسامه الهرماوي
  [VB.NET] بعد البحث في مواضيع الماسح الضوئي عذراً لم اجد مسح المستند الى PDF salah4salah@gmail.com 4 161 20-12-18, 01:24 AM
آخر رد: elgokr
  [سؤال] البحث في الاكسس اسامه الهرماوي 3 119 19-12-18, 04:11 PM
آخر رد: عبد العزيز البسكري
  [سؤال] طريقة البحث ابو يوسف النواوي 2 2 160 17-12-18, 09:08 PM
آخر رد: elgokr
  [سؤال] كيف يتم البحث عن شاشة بالفعل تعمل وتفعيلها لتصبح فوق الجميع dametucorazon 3 132 10-12-18, 05:47 AM
آخر رد: rmnr
  سؤال بخصوص البحث باستخدام التاريخ عن طريق WebService masry4u 3 136 08-12-18, 08:36 PM
آخر رد: masry4u

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


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