Connection a une base de donnée access
Résolu
bonjours a tous
c'est ma première question j'espère que je vais être bon alors voila:
je développe un code en vba derrière un formulaire sous access 2OO7, ce code ouvre un fichier exel récupère des donnée les place dans des tableau jusque la tout va bien maintenant vient le moment de se connecter aux tables.
j'ai trouver des exemple sur différent site je suis arrivé a ce code:
Dim con As ADODB.Connection
Set con = New ADODB.Connection
con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Users\yannick\Desktop\arsene_h11"
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
j'obtiens que la base est impossible à trouver alors que j'ai vérifier j'ai le bon chemin.
j'aimerais savoir aussi:
vu que je suis déjà dans la base si je fais bien de me connecter ou si on peut accéder aux tables directement si oui comment faire.
merci a ceux qui prendrons le temps de répondre a mes questions qui leurs paraitrons d'une simplicité...
:D
c'est ma première question j'espère que je vais être bon alors voila:
je développe un code en vba derrière un formulaire sous access 2OO7, ce code ouvre un fichier exel récupère des donnée les place dans des tableau jusque la tout va bien maintenant vient le moment de se connecter aux tables.
j'ai trouver des exemple sur différent site je suis arrivé a ce code:
Dim con As ADODB.Connection
Set con = New ADODB.Connection
con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Users\yannick\Desktop\arsene_h11"
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
j'obtiens que la base est impossible à trouver alors que j'ai vérifier j'ai le bon chemin.
j'aimerais savoir aussi:
vu que je suis déjà dans la base si je fais bien de me connecter ou si on peut accéder aux tables directement si oui comment faire.
merci a ceux qui prendrons le temps de répondre a mes questions qui leurs paraitrons d'une simplicité...
:D
4 réponses
-
ContributeurBonjour
data source = tonchemin\tabase.mdb
-
Bonjour,
Si tu es dans ta base ce code devrait suffir
Dim mDb Set mDb = CurrentDb
;o)
-
-
-
-
-
Tu dois trouver ce que tu cherches ici https://access.developpez.com/faq/
Ne sachant pas exactement ce que tu veux faire, ça nous est difficile de t'aider.
Jete un oeil sur le lien et reviens ici si tu as des difficultés.
;o)
-
-
Bonsoir,
Si tu codes sous access et que ta bd est dans le même projet, alors :
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
Set rs.ActiveConnection = CurrentProject.Connection -
super!
j'ai tout compris!
Mille merci pour les explications :D
