Lister les champs d'1 BDD Access

bonjour,


je cherche a lister les champs de la table "Cartouche" de ma base ACCESS.
j'ai essaye le code suivant qui ne fonctionne pas :
    Dim champ As Field
    For Each champ In CurrentDb.TableDefs("Cartouche").Fields
         MsgBox champ.Name
    Next
(ca plante sur le "CurrentDb.TableDefs("Cartouche").Fields")

par contre, ca fonctionne avec le code ci-apres (que je trouve completement inefficace) :
    Dim champ As Field
    Dim maTable As TableDef
    For Each maTable In CurrentDb.TableDefs
        If maTable.Name = "Cartouche" Then
            For Each champ In maTable.Fields
                MsgBox champ.Name
            Next
        End If
    Next

pourriez-vous m'aider a faire fonctionner le 1er de ces 2 codes ?

merci a vous,


alonsyl

salut,
CurrentDb ressemble plus à du VBA que du VB6 !!!
Vous êtes ici : Thèmes / Visual Basic 6 / Base de données / ADO & DAO /


ton access ouvre l abases liée à tes macros?
par défaut (selon version office) ? ADO? DAO ?

---

Prenez un instant pour répondre à ce sondage svp