Bonjour a vous,

voila ce que je souhaiterai faire en vbs :

J ai un fichier csv de la forme suivante :

Toto/maison/rouge/150000/rien/cbr0024
Titi/voiture/bleu/20000/utilitaire/vds0047
tata/rien/neuf/10000cfa/meuble/vds0175
...

Je souhaiterai passer le csv dans un tableau.

Ce qui me permetterai de faire la recherche suivante :

recherche de : Nom_user = titi

--> recherche dans le tableau.

placer la correspondance de titi dans des variables :

option1 = voiture
option2 = bleu
option3 = 20000
option4 = utilitaire
option5 = vds0047


Je ne m y connait vraiment peu en vbs

seul base que j ai trouvé etant :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
'Function csv_to_table(C:\Temp\base_deploiement.csv)
 
	Set FSO = CreateObject("Scripting.FileSystemObject")
	Set File = FSO.OpenTextFile(C:\Temp\base_deploiement.csv, 1)
 
	intSize = 0
 
	Do Until File.AtEndofStream
		strNextLine = File.ReadLine
		If InStr (strNextLine, ",") Then
				ReDim Preserve arrTxtArray(intSize)
				arrTxtArray(intSize) = strNextLine
				intSize = intSize +1
		End If
	Loop
csv_to_table = arrTxtArray
 
End Function
J'ai du faire pas mal d'erreur dans la fonction pour mettre le csv dans un tableau...

Une aide serait vraiment trés appréciée.

Merci d'avance.