Problème de connexion a une base de donnée VBA Access

Problème de connexion a une base de donnée VBA Access - VB/VBA/VBS - Programmation

Marsh Posté le 28-11-2006 à 15:06:02    

Bonjour.Voilà je suis en train de faire une application qui permet de gérer les associations de la mairie en VBA Access.J'ai une base de donnée et j'ai essayé de me connecter a la base grace au code suivant:

Code :
  1. Private Sub Form_Load()
  2. 'Déclaration de la variable de connexion'
  3. Dim connexion As ADODB.Connection
  4. Set connexion = New ADODB.Connection
  5. 'Définition du pilote de connexion'
  6. connexion.Provider = "Microsoft.Jet.Oledb.3.51"
  7. 'Définition de la chaîne de connexion'
  8. connexion.ConnectionString = "C:\TEMP\Projet\données.mdb"
  9. 'Ouverture de la base de données'
  10. connexion.Open
  11. End Sub


 
Quand j'éxécute, il me dit erreur d'éxécution 3706 : Impossible de trouver le fournisseur.Il est peut etre mal installé
Si quelqu'un aurait une idée sur ce problème s'il vous plait

Reply

Marsh Posté le 28-11-2006 à 15:06:02   

Reply

Marsh Posté le 28-11-2006 à 16:37:59    

en vba ca serait plutot ca non ? :
 Dim db As Database
     Set db = OpenDatabase(App.Path & "\mabase.mdb" )
ou Set db =OpenDatabase("C:\TEMP\Projet\données.mdb" )
pour ton cas ;)

Reply

Marsh Posté le 28-11-2006 à 17:17:08    

croli a écrit :

en vba ca serait plutot ca non ? :
 Dim db As Database
     Set db = OpenDatabase(App.Path & "\mabase.mdb" )
ou Set db =OpenDatabase("C:\TEMP\Projet\données.mdb" )
pour ton cas ;)


 
 
Merci ca marche

Reply

Marsh Posté le 28-11-2006 à 17:26:14    

mais de rien  :hello:


Message édité par croli le 28-11-2006 à 17:26:28
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed