تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
ملئ DataGridView بجدول قاعدة بيانات اكسس بواسطة combobox
#1
السلام يا اعضاء المنتدى الكرااام 
عندي فورم يحتوي DataGridView1 و اثنين combobox .. 
المطلوب انو لما اختار "Grop1" من combobox1 يتم تحديد الجدول رقم واحد "Ta1" الموجود في قاعدة بيانات اسمها Pro و يتم عرض جميع بيانات Ta1 في DataGridView1 .. 

حاولت :::

كود :
Public ConnPro As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source =" & Application.StartupPath & "\Pro.mdb")
  "

    Dim sql As String = " select* from هنا شلون اخليه يختار جدول "
    Dim db1 As New OleDb.OleDbDataAdapter(sql, ConnPro)
    Dim dbs As New DataSet


بس للاسف ما عرفت اسويها !؟؟ 

و المطلوب الثاني انو لما اختار من combobox1 احد الاقسام "Grop1,Grop2,Grop3" و اختار من الـ combobox2 احد الخيارات .. تتنفذ هاذي الجملة : 

كود :
Dim sql As String = "DELETE FROM WHERE =" & ComboBox1.SelectedItem & " WHERE PName=" & ComboBox2.SelectedItem & ""

يعني ينحذف السجل الموجود في قاعدة البيانات بناء على الي نختاره من ComboBox1 الي يحدد الجدول .. و ComboBox2 يحدد العنصر الي في عمود PName ..






انتظر مساعدتكم


ثانكس
الرد
تم الشكر بواسطة:
#2
السلام عليكم و رحمة الله و بركاته
فبل الإجابة على تساؤلك أود أن أعرف هل الكومبو بوكس مرتبط مع قاعدة بيانات أم هما معبئان يدويا
السلام عليكم و لاحمة الله و بركاته
الرد
تم الشكر بواسطة:
#3
السلام عليكم


بالنسبة للسؤال الاول:


كود :
Dim connPro As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source =" & Application.StartupPath & "\Pro.mdb")


        Dim sql As String = " select * from " & combobox1.Text
        Dim db1 As New OleDb.OleDbDataAdapter(sql, connPro)
        Dim dbs As New DataSet
        connPro.Open()
        db1.Fill(dbs)
        connPro.Close()

        Dim t As New DataTable()
        t = dbs.Tables(0)
        DataGridView1.DataSource = t





أما السؤال الثاني:


كود :
Dim del As String = "DELETE FROM " & ComboBox1.Text & "WHERE PName='" & ComboBox2.Text & "'"
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  عرض اسم عميلين في جدول العملاء بشرط ارقامهم بجدول اخر يونس علي 1 26 منذ 5 ساعة مضت
آخر رد: محمد كريّم
  [VB.NET] قاعدة بيانات postgress tarek 2 133 06-04-19, 09:07 PM
آخر رد: elgokr
  كود تصفير عمود في جدول اكسس samira20 1 68 31-03-19, 09:02 PM
آخر رد: بدري
  أضافة زر إلى الفورم بواسطة الكود djelloul 0 36 30-03-19, 10:11 PM
آخر رد: djelloul
  الاتصال بقاعدة بيانات mdf موجودة على القرص نور الهدى الهدى 10 422 18-03-19, 08:55 PM
آخر رد: 5000
  [SQL] مشكلة في ربط قاعدة البيانات SQLSERVER2014 بـ فيجول بيسك 2017 اباذر 4 183 16-03-19, 12:00 AM
آخر رد: اباذر
  طريقة ادخال اعداد تحتوي على فاصلة في قاعدة البيانات segma 21 514 12-03-19, 10:23 PM
آخر رد: segma
  [VB.NET] البحث عن مسار مجلد ضمن قاعدة البيانات اكسس وفتحه من الفورم EMADSSS 1 155 21-02-19, 04:38 PM
آخر رد: elgokr
  (سؤال؟)كود اضافة التاريخ في قاعدة البيانات اسمهان 1 197 20-02-19, 11:08 AM
آخر رد: alfaiz678
  قاعدة بيانات بيانات ال sql مع الفجوال 2008 raaddawood 0 197 02-02-19, 11:16 AM
آخر رد: raaddawood

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


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