Problème ouverture access via vb6

Bonjour à tous je suis bloqué sur la simple ouverture de ma base access.
En faite je voudrais par la suite écrire dessus des données provenant d'un serveur opc.
Mais déjà je n'arrive pas à l'ouvrir cette base, depuis 7 heure du mat'.
J'ai essayé pas mal de chose déjà faite mais rien n'y fait.

Code:

---

1 2 3 4 5

Dim CnxStrg As String Private Const myPathBd = "F:\Nouveau_Projet\acces\Base.mdb" CnxStrg = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & myPathBd cnnADO.ConnectionString = CnxStrg cnnADO.Open

---

Peut être il faut mieux utiliser l'ado?
Merci par avance de votre aide

va voir ma dernière réponse dans ce post :

http://www.developpez.net/forums/d72...ur/pb-sql-vb6/

Merci pour la réponse mais avec cela j'ai un soucis à ce niveau :

Code:

---

1 2 3 4

aBase.Provider = "Microsoft.Jet.OLEDB.4.0" 'définition du fournisseur de la connexion' MaBase.ConnectionString = App.Path & "\Base.mdb" 'le plus facile étant de mettre ta base au même endroit que ton application puis tu utilises App.Path' MaBase.Open 'la base est ouverte'

---

Nom de fichier incorrect pourtant j'ai beau vérifier le chemin est bien bon.
Merci de votre aide

Bonjour,

Fais d'abord

Code:

---

1 2 3 4 5 6 7 8

aBase.Provider = "Microsoft.Jet.OLEDB.4.0" 'définition du fournisseur de la connexion' MaBase.ConnectionString = App.Path & "\Base.mdb"   Msgbox(App.Path & "\Base.mdb") 'ici   'le plus facile étant de mettre ta base au même endroit que ton application puis tu utilises App.Path' MaBase.Open 'la base est ouverte'

---

Et vérifie les données fournies par la Msgbox,c'est la 1ère chose à faire.

A+

Re bonjour je n'ai pas compris pourquoi mais maintenant cela marche.
Merci à tous

Code:

---

1 2 3 4

MaBase.Provider = "Microsoft.Jet.OLEDB.4.0" 'définition du fournisseur de la connexion' MaBase.ConnectionString = App.Path & "\Base.mdb" 'le plus facile étant de mettre ta base au même endroit que ton application puis tu utilises App.Path' MaBase.Open 'la base est ouverte'

---