Format de base de données non reconue [Résolu]

Signaler
Messages postés
19
Date d'inscription
mercredi 9 janvier 2002
Statut
Membre
Dernière intervention
27 novembre 2010
-
Messages postés
19
Date d'inscription
mercredi 9 janvier 2002
Statut
Membre
Dernière intervention
27 novembre 2010
-
Bonjour

uen fois j'execute le code suisvant un message m'apparait "Format de base de données non reconue"
pouvez vous m'aider et Merci

Dim Db As DAO.Database
Dim tbd As DAO.TableDef
Dim fld As DAO.Field
Set Db = DBEngine.OpenDatabase("E:\base2002.mdb", True)
'liste des tables
For Each tbd In Db.TableDefs
 
        MsgBox "Table : " & tbd.Name
Next

2 réponses

Messages postés
19
Date d'inscription
mercredi 9 janvier 2002
Statut
Membre
Dernière intervention
27 novembre 2010

j'ai trouvé la solution et comme meme merci

Dans la boîte de dialogues Références (menu Projet), supprimer la
référence à Microsoft DAO 3.51 Object Library et ajouter la référence à
Microsoft DAO 3.6 Object Library
pour une explication plus ample visiter ce lien http://support.microsoft.com/kb/468732/fr
Messages postés
19
Date d'inscription
mercredi 9 janvier 2002
Statut
Membre
Dernière intervention
27 novembre 2010

ma base de données est access 2000