تقييم الموضوع :
  • 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()
الرد }}}
تم الشكر بواسطة:
#2
مفيش رد واحد
الرد }}}
تم الشكر بواسطة:
#3
أرسل لنا قاعدة البيانات للإطلاع على الجداول لو سمحت
الرد }}}
تم الشكر بواسطة:
#4
(02-01-18, 09:02 PM)karimx كتب : أرسل لنا قاعدة البيانات للإطلاع على الجداول لو سمحت

اشكرك علي ردك ولكن البرنامج كامل  يصعب وضعة

الكود معي يبحث بالجدول الاول وفي الحقول المطلوبة
المشكلة عند البحث يحذف كل بيانات الجدول الثاني ولا يظهر منها شيء معي اني مش ببحث في حقولها يعني الاعمدة الخاصة بالجدول الثاني تصبح فارغة مع  وجود رؤس الاعمدة باسماؤها

وعند الملا اقوم بملاء بيانات الجدولين ولكن لاشيء ايضا تظل فارغة
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  أريد البحث بإستخدام أي جزء من الكلمة و ليس أول جزء منها . CoderMM 3 83 أمس, 01:19 AM
آخر رد: Taha Okla
  [سؤال] أتمنى اجابة وافية:عمل برنامج بقاعدة بيانات SQL دون حاجة تثبيت SQLSERVER dr.programming 6 652 19-03-24, 08:56 AM
آخر رد: سلامه محمد11
  [VB.NET] حل مشكلة الاتصال بقواعد البيانات access loay775 2 170 25-02-24, 06:29 AM
آخر رد: loay775
  [VB.NET] البحث باستخدام CheckedListBox لتكون نتيجة التحديد شرط لجملة الاستعلام ahmedramzyaish 0 123 19-02-24, 03:44 AM
آخر رد: ahmedramzyaish
  سؤال عن عملية حذف سجل من قاعدة البيانات assuhimi 3 262 11-02-24, 08:43 PM
آخر رد: assuhimi
  البحث بالهوية annagui 2 323 25-01-24, 01:00 PM
آخر رد: annagui
  [VB.NET] منع تكرار البيانات في عند الادخال مبرمج صغير 1 2 267 24-01-24, 05:18 PM
آخر رد: مبرمج صغير 1
  [VB.NET] مساعدة في استدعاء البيانات معينه من form الأول إلى form 2 بدون التعديل loay775 2 281 18-01-24, 05:04 PM
آخر رد: loay775
  [VB.NET] إعادة استدعاء البيانات من قاعدة بيانات اكسس والاهم الصورة مبرمج صغير 1 1 282 13-01-24, 01:17 PM
آخر رد: مبرمج صغير 1
  [VB.NET] ما الخطأ فى هذا الكود - كود البحث المتعدد Ashraf Elafify 7 476 27-12-23, 10:50 PM
آخر رد: Ashraf Elafify

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


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