Comment lister les tables d'une base de donnée ?

Question

Bonjour,
Je suis actuellement en stage et je dois faire un programme en VB. Le but de ce programme est de lister toutes les tables et les champs de chaque table d'une base de donnée en connaissant seulement le nom de la base de donnée.

Je suis vraimment perdu, aidez moi !!!  :sad)

gigatoto · Answer

euh bon moi je débute mais j'ai un truc qui tourne:

Private connection As String
Private maconnection As New adodb.connection
Private monjeu As New adodb.Recordset

connection = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
      "Data Source=" & chemin & liste_bases.FileName & ";" & _
      "Persist Security Info=False"
maconnection.Open connection

Set monjeu = maconnection.OpenSchema(adSchemaTables)
monjeu.MoveFirst

Do While Not monjeu.EOF
  If monjeu!TABLE_TYPE = "TABLE" Then    Liste_tables.AddItem  monjeu!TABLE_NAME
        monjeu.MoveNext
Loop

Comment lister les tables d'une base de donnée ?

1 réponse

Discussions similaires