[RESOLU] equivalent "show table"

equivalent "show table" [RESOLU] - VB/VBA/VBS - Programmation

Marsh Posté le 08-10-2004 à 11:53:08    

Bonjour,
 
je debute en VBasic et jesuis sur un projet avec gestion de base de donnée.
 
je suis habitué au php-sql et j'utilise la commande "show table" pour voir le contenu de la DB.
j'aimerai savoir si il y a un equivalent a cette commande en VBasic et si non comment je pourrais y remédier.
Merci


Message édité par petitefonc le 12-10-2004 à 09:45:17
Reply

Marsh Posté le 08-10-2004 à 11:53:08   

Reply

Marsh Posté le 12-10-2004 à 09:44:28    

g trouver sur le site de Microsoft:
Sub ADOListTables()
   Dim cat As New ADOX.Catalog
   Dim tbl As ADOX.Table
   ' Ouverture du catalogue
   cat.Activeconnection = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
      "Data Source=.\Comptoir.mdb;"
   ' Création d'une boucle dans les tables de la  
base de données et impression du nom des tables
   For Each tbl In cat.Tables
      If tbl.Type <> "VIEW" Then Debug.Print tbl.Name
   Next
End Sub

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed