Discussion :

[leo13]

salut a tout le monde,
Je suis entrein de developper une application excel(vba)/access, mais j ai eu un probleme, j arrive pas a me connecter a ma base de donner access 2000, il me donne erreur dans la ligne oú j assigne le provider de conexión.
le code est le suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Private Sub ConnecterBase(ConnectBD As Object, Optional rs As Object, Optional pa As Object)
     Set ConnectBD = CreateObject("ADODB.Connection")
     Set rs = CreateObject("ADODB.Recordset")
     Set pa = CreateObject("ADODB.Recordset")
     With ConnectBD
          .Provider = "Microsoft.Jet.OLEDB.4.0"
          .ConnectionString = chemin_de_base_donnees
          .Open
     End With
End Sub

merci de votre aide

[ouskel'n'or]

Tu as jeté un oeil sur le forum VBA ?
J'ai vu ça : http://www.developpez.net/forums/sho...nnecter+Access
Mots clé "Connecter & Access"
Mais il y a de nombreuses réponses

[leo13]

Tu as jeté un oeil sur le forum VBA ?
J'ai vu ça : http://www.developpez.net/forums/sho...nnecter+Access
Mots clé "Connecter & Access"
Mais il y a de nombreuses réponses

merci, je vais le voire maintenant.
merci bcp

[SfJ5Rpw8]

et c'est quoi l'erreur...?

[leo13]

et c'est quoi l'erreur...?

il ne reconnait pas le provider.
pourtant j utilise access 2000.

[SfJ5Rpw8]

tu as quoi dans la chaine :
chemin_de_base_donnees

[leo13]

tu as quoi dans la chaine :
chemin_de_base_donnees

dans la variable chemin_de_base_donnees j ai le chemin d access a ma base de donnees.

le probleme c est que il le programme plante lorsque je tente de lui attribue le provider.

[leo13]

Tu as jeté un oeil sur le forum VBA ?
J'ai vu ça : http://www.developpez.net/forums/sho...nnecter+Access
Mots clé "Connecter & Access"
Mais il y a de nombreuses réponses

j ai essayer avec la solution citer dans le forum mais toujours ca marche pas ,
en tout cas merci de votre aide