PDA

View Full Version : (یک سوال سخت(برای من



armin_izer
یک شنبه 16 اسفند 1383, 19:57 عصر
سلام

چجوری میشه یک دیتابیس رو باز کرد و لیستی از تمتم Tabel ها و لیستی از فیلد ها و همچنین لیستی از نوع فیلد ها تهیه کرد.

بابک زواری
یک شنبه 16 اسفند 1383, 22:36 عصر
با کمک DAO

For i = 0 To Data1.Database.TableDefs.Count - 1
If Left(Data1.Database.TableDefs(i).Name, 4) <> "MSys" Then
Combo1.AddItem Data1.Database.TableDefs(i).Name
End If
Next


For i = 0 To Data1.Recordset.Fields.Count - 1
lstAll.AddItem Data1.Recordset.Fields(i).Name
Next
تعریف متغییر ها و افزودن کامبو و ... یادت نره درضمن چون این کد رو قبلا
نوشته بودم با DAO بود
بابک زواری

Behrouz_Rad
یک شنبه 16 اسفند 1383, 22:53 عصر
راه بهتر استفاده از کتابخانه ADOX است.
Microsoft Activex Data Objects For Data Definition Language and Security