Bonjour,
Je cherche le code fonctionnel pour �tablir une connexion ODBC vers ma base de donn�es Access depuis visual basic (sous word). Le lien ODBC a �t� cr��. Apr�s des recherches infructueuses je me tourne vers vous. Je vous en serais tr�s reconnaissant.
Mon premier test:
Erreur = "Objet requis", il manque une donn�e ?
Code : S�lectionner tout - Visualiser dans une fen�tre � part
1
2
3 ' Connexion � la base: Set db = DBEngine.Workspaces(0).OpenDatabase("Nom de la base", , "DSN=Nom de la base;UID=Mon UID;PWD=Mon Password")
Deuxi�me code:
Erreur: "Nom de la source pas trouv� et driver non sp�cifi�", bref �trange.
Code : S�lectionner tout - Visualiser dans une fen�tre � part
1
2
3
4
5
6
7
8
9
10
11
12
13 ' Outils, References, ajouter Microsoft DAO 3.6 object library ' Set conn = CreateObject("ADODB.Connection") 'Set rs = CreateObject("ADODB.recordset") 'Chemin_Base = "Chemin de la base" 'chaine de connexion: enlever ,*.accdb si pas 2007 et plus 'connstring = "DRIVER={Microsoft Access Driver (*.mdb,*.accdb)}; DBQ=" & Chemin_Base 'Connexion a la base ' conn.Open connstring End Sub
Merci.
Partager