[VB6] Fichier csv dans un recordset

Bonjour,

J'aimerais lié un recordset sur une fichier .csv. J'utiliserais donc mon recordset dans le fichier pareille comme je ferais pour une table dans un fichier mdb. Est-ce que ça se fait? Si oui, comment?

Voici ce que j'ai fait jusqu'à maintenant :

Variable globale au module

Code:

---

1 2	Dim cn As ADODB.Connection Private WithEvents rs As ADODB.Recordset

---

Sur clic d'un bouton

Code:

---

1 2 3 4 5

cn.Provider = "ADsDSOObject" cn.ConnectionString = "AdrFichier" cn.Open rs.CursorLocation = adUseClient rs.Open "AdrFichier", cn, adOpenDynamic, adLockReadOnly, adCmdText

---

ça plante sur rs.Open
En fait, je ne sais pas quoi mettre comme premier paramètre (je mettrais bien le nom de ma table si c'était un fichier Access...) et je ne suis pas certaine des autres paramètres non plus.
Je n'ai besoin que de lire (ou rechercher) les données, pas d'ajout, pas de modification et pas de suppression non plus.

Je suis peu familière avec ADODB... (et ça fait 4 ans que j'ai pas travaillé avec du "vrai" VB (pas du VBA)). :oops:

Merci pour votre aide!

regarde les connexions à des fichiers text
http://www.connectionstrings.com/

Merci!

Pour ceux que ça pourrait intéresser, avec les modifications suivantes ça fonctionne.

Code:

---

1 2 3

cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\repertoireX\;Extended Properties=""text;HDR=Yes;FMT=Delimited""" rs.CursorLocation = adUseClient rs.Open "select * from [NomFichier.csv]", cn, adOpenDynamic, adLockReadOnly, adCmdText

---

Merci pour cette aide rapide!