تقييم الموضوع :
  • 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 ك ب / التحميلات : 14)

أتمنى لك التوفيق
الرد }}}}
تم الشكر بواسطة:
#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
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] حفظ تاريخ معين بقاعدة البيانات توفي العراقي 3 67 منذ 11 ساعة مضت
آخر رد: ali.alfoly
Star [VB.NET] السلام عليكم اخوتي ف المنتدى احتاج الي مساعدة انا اصمم منظومة لشؤون العاملين بعد اض fatma anari 2 78 أمس, 11:04 AM
آخر رد: أبوبكر سويدان
  تغيير قاعدة البيانات الى .bak زيد زينوبي 3 42 03-12-16, 07:07 PM
آخر رد: ابراهيم النعيمي
  [سؤال] ايهما افضل في قواعد البيانات للتميم برنامج sal.softip 2 34 03-12-16, 06:59 PM
آخر رد: sal.softip
  قاعدة البيانات لا تدعم اللغة العربية ؟؟؟؟؟؟ صبري زينوبي 13 190 03-12-16, 04:47 PM
آخر رد: صبري زينوبي
  طلب مساعدة ناتج طرح عددين قيمة سالبه khalaroy 2 45 01-12-16, 03:09 AM
آخر رد: khalaroy
  [سؤال] مساعدة في الفيجوال بيسك عبدالرحمن المكاوي 1 59 28-11-16, 02:11 PM
آخر رد: عبدالرحمن المكاوي
  مساعدة في عمل برنامج rabeh.ram 4 171 27-11-16, 12:29 AM
آخر رد: rabeh.ram
  تغيير قاعدة البيانات من اكسس الى sql hglogtd 2 97 26-11-16, 03:03 AM
آخر رد: hglogtd
  مساعدة في انشاء ثيم عبدالرحمن المكاوي 11 285 25-11-16, 11:57 AM
آخر رد: العزابي

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


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