تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مساعدة بقواعد البيانات
#1
السلام عليكم

اود طلب المساعدة بخصوص كود يعرض كل ال columns لجدول معين فى data grid view بحيث يكون كل column فى row داخل ال data grid view

ارجو المساعدة و شكرا  Smile
الرد }}}}
تم الشكر بواسطة:
#2
اذا تقصد عرض جدول بالاداة فاضبط مصدر البيانات الخاص بها على DataTable تعبئة من الجدول المطلوب.
كل مااعرفه في البرمجة تجدونه هنا
الرد }}}}
تم الشكر بواسطة:
#3
في جملة select فقط اختر *بدلا من اسماء الحقول في الجدول
الرد }}}}
تم الشكر بواسطة:
#4
تفضل أخي العزيز
هذا المثال بناء لطلبك

.rar   khodor-GetData.rar (الحجم : 80.36 ك ب / التحميلات : 23)

أتمنى لك التوفيق
الرد }}}}
تم الشكر بواسطة:
#5
كود :
Dim str As String = "Provider=Microsoft.jet.oledb.4.0;Jet OLEDB:Database Password=2016;Data Source=C:\Users\mohamed haroon\Desktop\db1.mdb;"

    Dim con As New OleDb.OleDbConnection(str)

dg.DataSource = Nothing
        dg.Rows.Clear()
        Dim d As New DataTable("infoma")
        Dim cm As New OleDb.OleDbCommand("", con)
        cm.Parameters.Clear()
        If con.State = ConnectionState.Closed Then con.Open()
       
        dg.ColumnCount = 2
        dg.Columns(0).Name = "details"
        dg.Columns(1).Name = "type"

        Dim name(d.Columns.Count) As String
        Dim i As Integer = 0
        For Each column As DataColumn In d.Columns
            name(i) = column.ColumnName
            i += 1
        Next



هذا هو قصدى لاكنى لا ادرى كيفية استخراج المصفوفة name فى data grid view
الرد }}}}
تم الشكر بواسطة:
#6
انت عايز اسماء الاعمدة اللي تمثل اسماء الحقول
والا عايز القيم في السجلات ؟
dg.Columns(0).Name = "details"
dg.Columns(1).Name = "type"
هنا بيغير اسم الحقل أو العمود فقط الى details و type
يعني هيبان في الجريد اسم العمود details و type
سبحان الله والحمدلله ولا إله إلا الله والله أكبر
 رَبِّ اغْفِرْ لِي وَلِوَالِدَيَّ
Heart
الرد }}}}
تم الشكر بواسطة:
#7
شكرا لمشاركة الاخوة لقد وجدت هذا الكود و هو يعمل بنجاح Smile
كود :
provider = "Provider=Microsoft.jet.oledb.4.0;Jet OLEDB:Database Password=2016;Data Source ="
       dataFile = "C:\Users\mohamed haroon\Desktop\db1.mdb"
       connString = provider & dataFile
       myConnection.ConnectionString = connString
       myConnection.Open()
       Try
           Dim Rest() As String = {Nothing, Nothing, "infoma", Nothing}
           Dim columns As String = "Columns"
           Dim dt As DataTable = myConnection.GetSchema(columns, Rest)
           For Each row As DataRow In dt.Rows
               dg.Rows.Add(row.Item("COLUMN_NAME").ToString)
           Next

           myConnection.Close()
       Catch ex As Exception
       End Try
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مساعدة هامة جدا ashfgsm 18 281 أمس, 05:39 PM
آخر رد: WAEL ABED
  رسالة خطأ عند استعراض البيانات aftfm 2 49 18-10-17, 06:33 PM
آخر رد: Rabeea Qbaha
  عمل شريط متحرك من قاعدة البيانات hglogtd 24 293 15-10-17, 11:54 PM
آخر رد: hglogtd
  ربط combobox بصفحه البيانات abdel.halim 8 133 11-10-17, 07:27 PM
آخر رد: abdel.halim
  توقف قاعدة البيانات عن الاستجابة وعدم قبول اي تعديلات nassery99 2 56 09-10-17, 06:34 PM
آخر رد: nassery99
  [VB.NET] مساعدة بخصوص mysql MOSTAFA.KAMEL 0 47 06-10-17, 07:30 AM
آخر رد: MOSTAFA.KAMEL
  [VB.NET] سؤال :- طريقة جميع الوقت من قاعدة البيانات dubai.eig 4 122 03-10-17, 04:02 PM
آخر رد: dubai.eig
  مساعدة في حفظ ماهو مكتوب في textbox اوتوماتيكي trakktour 1 85 01-10-17, 10:30 PM
آخر رد: Amir_alzubidy
  مشكله تكرار اول قيمه اضيقت لقاعدة البيانات !! Rabeea Qbaha 2 80 29-09-17, 04:51 AM
آخر رد: Rabeea Qbaha
  مساعدة في الكود hikmat 0 42 27-09-17, 10:08 AM
آخر رد: hikmat

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


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