Format de base de données non reconue

Résolu
silarou Messages postés 19 Date d'inscription mercredi 9 janvier 2002 Statut Membre Dernière intervention 27 novembre 2010 - 6 févr. 2008 à 10:07
silarou Messages postés 19 Date d'inscription mercredi 9 janvier 2002 Statut Membre Dernière intervention 27 novembre 2010 - 6 févr. 2008 à 10:18
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

silarou Messages postés 19 Date d'inscription mercredi 9 janvier 2002 Statut Membre Dernière intervention 27 novembre 2010
6 févr. 2008 à 10:18
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
3
silarou Messages postés 19 Date d'inscription mercredi 9 janvier 2002 Statut Membre Dernière intervention 27 novembre 2010
6 févr. 2008 à 10:08
ma base de données est access 2000
0
Rejoignez-nous