Récupérer les noms de tables dans Access

minimarch Messages postés 31 Date d'inscription mercredi 2 avril 2003 Statut Membre Dernière intervention 12 février 2006 - 3 mars 2004 à 08:42
cs_snowsurfer69 Messages postés 35 Date d'inscription mardi 25 mai 2004 Statut Membre Dernière intervention 23 juin 2004 - 15 juin 2004 à 15:13
Bonjour,

je cherche à savoir s'il est possible par l'intermédiaire d'une requête SQL (ou tout autre moyen d'ailleurs) de récupérer le noms des tables et leurs attributs dans une base de données Access.

MiniMarch' ;)

3 réponses

darollinghobbit Messages postés 55 Date d'inscription mardi 2 mars 2004 Statut Membre Dernière intervention 18 juin 2004 1
3 mars 2004 à 09:55
Bonjour,

Tu peux utiliser ce code pour lister tes tables Access ainsi que leurs propriétés

Dim db As Database
Dim tbl As TableDef
Dim prp As Property
Dim iCpt As Integer

Set db = CurrentDb

For Each tbl In db.TableDefs
If Mid(tbl.Name, 1, 4) <> "Msys" Then
Debug.Print tbl.Name
For iCpt = 0 To tbl.Properties.Count - 1
Debug.Print ">>>"; tbl.Properties(iCpt).Name; " "; tbl.Properties(iCpt).Value
Next
End If
Next
0
capoueidiablo Messages postés 316 Date d'inscription jeudi 9 janvier 2003 Statut Membre Dernière intervention 1 février 2010 1
3 mars 2004 à 10:22
Sinon,
un peu plus compliqué, tu as l'API OBDBC SQLTable qui fonctionne pas trop mal :p
--Capoueidiablo--
0
cs_snowsurfer69 Messages postés 35 Date d'inscription mardi 25 mai 2004 Statut Membre Dernière intervention 23 juin 2004
15 juin 2004 à 15:13
bonjour a tous

moi je voudrait afficher les noms de mes champs dans une zone de liste a travers une requète sql mise dans la zone "contenu"(avec access 2002)

si vous avez des soutions je suis preneur!!!

merci
++
0
Rejoignez-nous