منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[سؤال] محتاج كود جلب columns name لقاعدة بيانات access - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [سؤال] محتاج كود جلب columns name لقاعدة بيانات access (/showthread.php?tid=15246)



محتاج كود جلب columns name لقاعدة بيانات access - iraqdeveloper - 28-03-16

اخواني الاعزاء 
السلام عليكم
شرعت بمشروع code coder
وهو مشروع يفيد مصممي البرامج على الفيجوال او السي شارب 
ومحتاج مساعدتكم بكود جلب اسماء حقول جدول 
الفكرة اني بدأت بالمشروع وقمت بالاتصال بـــ sqlserver
وجلبت مجال الاسماء من الجداول واسماء الجداول وربطتها وحصلت على نتائج باهرة 
ولكن المشكلة الان اريد عمل نفس الشيء مع قاعدة بيانات Access
ولكن لم احصل على نتيجة سوى اني جلبت اسماء الجداول ووضعتها في داتاكريد
ولكن فشلت بجل اسماء الحقول columns name لجدول موجود في Access
اطلب منكم ان تساعدوني في هذا الكود واكون شاكر لكم وانتضر الرد منكم


RE: محتاج كود جلب columns name لقاعدة بيانات access - boudyonline - 28-03-16

جرب الكود التالي :


PHP كود :
Dim name(DT.Columns.Count) As String
Dim i 
As Integer 0
For Each column As DataColumn In DT.Columns
  name
(i) = column.ColumnName
  i 
+= 1
Next 



RE: محتاج كود جلب columns name لقاعدة بيانات access - iraqdeveloper - 28-03-16

(28-03-16, 02:10 AM)boudyonline كتب : جرب الكود التالي :


PHP كود :
Dim name(DT.Columns.Count) As String
Dim i 
As Integer 0
For Each column As DataColumn In DT.Columns
  name
(i) = column.ColumnName
  i 
+= 1
Next 

اخي العزيز لم ينجح معي هذا الكود 
شكرا على تعبك معي  Angel

ارجو الرد من الاخوة اريد وضع اسماء الحقول في textbox 
على شكل مصفوفة واحد تلو الاخر واتحكم بالتابة جنبه حتى يتكزن عندي كود جاهز استخدمه في براجي