Connection a une base de donnée access

Résolu
kenru64 Messages postés 29 Statut Membre -  
kenru64 Messages postés 29 Statut Membre -
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

A voir également:

4 réponses

michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 318
 
Bonjour

data source = tonchemin\tabase.mdb

0
kenru64 Messages postés 29 Statut Membre 5
 
je viens de copier coller le chemin ce n'est malheureusement pas ca
pourquoi mabase.mdb et pas mabase.accdb ??
0
Polux31 Messages postés 7219 Statut Membre 1 204
 
Bonjour,

Si tu es dans ta base ce code devrait suffir

Dim mDb

  Set mDb = CurrentDb


;o)
0
kenru64 Messages postés 29 Statut Membre 5
 
je vais tester tout de suite :)
0
michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 318
 
très juste, Polux...
0
kenru64 Messages postés 29 Statut Membre 5
 
en réalité je sais pas trop comment utiliser ce que tu m'as donné :S
tu peux me le mettre dans un exemple de connexion ou d'ouverture d'une table quelconque??
0
kenru64 Messages postés 29 Statut Membre 5
 
non dsl je n'arrive pas a l'utiliser
0
Polux31 Messages postés 7219 Statut Membre 1 204
 
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)
0
Kaze_no_i-guru Messages postés 66 Statut Membre 28
 
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
0
kenru64 Messages postés 29 Statut Membre 5
 
super!
j'ai tout compris!
Mille merci pour les explications :D
0