[AHMED SHARAF]

السلام عليكم ورحمة الله وبركاته
أعضاء المنتدي الكرام
ممكن حد يساعدني
عندي جدول في قاعدة بيانات أكسس
أريد عرض أسماء الحقول في ليست بوكس
بمعني لو عندي جدول الاصناف مثلاً
فيه 3 حقول
ID
ITMNAME
PRICE
إزاي أعرض هذه الاسماء في الليست بوكس

[مهموم]

السلام عليكم ورحمة الله

أخي أحمد

هذه أبسط طريقة ممكن تستخدمها

PHP كود :

Using dataTable As New DataTable
    Dim ret = New OleDbDataAdapter("Select * From [table1]", connection).Fill(DataTable)
    Dim columns = (From x In dataTable.Columns Select x.ColumnName).ToArray

    ListBox1.Items.AddRange(columns)

End Using 


[AHMED SHARAF]

أخي الكريم (مهموم)
أشكرك علي سرعة الرد
أنا جربت الكود والحمد لله إشتغل معايا كويس جداً
ولو ممكن كود لنفس الفكرة بس عرض الجداول اللي في الداتا بيس

[مهموم]

السلام عليكم ورحمة الله

أخي أحمد

هذه أبسط طريقة ممكن تستخدمها

PHP كود :

Dim dataTable As DataTable
connection.Open()
dataTable = connection.GetSchema("Tables", New String() {Nothing, Nothing, Nothing, "Table"})
connection.Close()
Dim tables = (From x In dataTable Select x("TABLE_NAME")).ToArray

ListBox1.Items.AddRange(tables) 


[AHMED SHARAF]

أشكرك أخي الكريم
وجزاك الله خيراً