ODBC Visual Basic to Access

Wasimolo -
michel_m Messages postés 16602 Date d'inscription Statut Contributeur Dernière intervention - 20 nov. 2012 à 08:12

Bonsoir,

Je désire créer une connexion entre mon formulaire (visual basic sous Word) et ma bdd Access, j'ai créé le lien ODBC. Cependant, je n'arrive pas à établir la connexion dans mon code VBA, j'ai testé plusieurs codes trouvés internet :soit la fonction n'est pas reconnue ou ne fonctionne pas. Bref, avez-vous une idée du code "type" ou exemple qu'il faut utiliser?

Merci d'avance.

A voir également:

ODBC Visual Basic to Access
Visual basic - Télécharger - Langages
Microsoft 365 basic - Accueil - Microsoft Office
Visual c++ 2019 - Guide
Visual paradigm - Télécharger - Gestion de données
Qwerty to azerty - Guide

4 réponses

Réponse 1 / 4

michel_m Messages postés 16602 Date d'inscription Statut Contributeur Dernière intervention 3 314

Bonjour,

montre nous la partie de ton code concernant la connection...

Réponse 2 / 4

Wasimolo

Voila le code:

' Outils, References, ajouter Microsoft DAO 3.6 object library
  Set conn = CreateObject("ADODB.Connection")
  Set rs = CreateObject("ADODB.recordset")
  
  'Chemin_Base = "P:\Mes Documents\FSBB.accdb"

  'haine 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

Réponse 3 / 4

michel_m Messages postés 16602 Date d'inscription Statut Contributeur Dernière intervention 3 314

Bonjour

DBQ=" & Chemin_Base & ";"
au besoin écrire
DBQ='" & Chemin_Base & "'
(lire apostrophe guillemets)

je suppose que l'apostrophe devant 'Chemin_Base = "P:\Mes Documents\FSBB.accdb"
est supprimée

Au passage, comme tu utilises ADO, tu n'as pas besoin d'activer DAO

comme tu as utilisé cette syntaxe
Set conn = CreateObject("ADODB.Connection")
tu n'as pas besoin non plus d'activer ADO dans les références
mais il serait préférable de déclarer conn (et rs)
Dim conn as object
Dim re as object

Réponse 4 / 4

Wasimolo

Merci pour ton aide, j'ai changé le code et maintenant un autre message d'erreur: "[Microsoft][ODBC Driver Manager] Data source name not found and no default driver specified", la syntaxe n'est pas encore correcte, je cherche.

Mon code:

connstring = "DRIVER={Microsoft Access Driver (*.mdb,*.accdb)}; DBQ='" & Chemin_Base & "'

L'autre ne fonctionne pas aussi.

michel_m Messages postés 16602 Date d'inscription Statut Contributeur Dernière intervention 3 314

bonjour

regarde sur ce site si tu ne trouves pas ton bonheur
https://www.connectionstrings.com/

regarde aussi cette discussion
https://forums.commentcamarche.net/forum/affich-2787257-difference-entre-ado-odbc-oledb#6

Discussions similaires

Sécurité réseau

Microsoft Visual C++ ? C'est quoi ?

Site de confiance ou non ?

Acer quick access

Comment passer de .wfp a mp4

Votre réponse

Discussions similaires