Bonjour à tous, je ne trouve pas de discussion a ce sujet...

J'ai script qui lit un fichier texte qui a cette forme :
c:\fichier.txt :
Michelupont:0189093434:9 aller de truc muche:consultant

J'aimerais avoir chaque champs dans des variables..

Mon script vbs :
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
19
20
 
'<<<<<<< LECTURE d'un fichier >>>>>>>>>>>>
 
'déclaration file system object
Dim fso
 
'instanciation
Set FSO = CreateObject("Scripting.FileSystemObject")
 
'on instance le fichier texte 
Set Ftxt = FSO.OpenTextFile("c:\fichier.txt")
 
'on parcours chaque ligne du fichier texte
Do While Not Ftxt.AtEndOfStream
      MaVariable = Ftxt.Readline
      '....... <- votre code ici pour traiter chaque ligne
	  MsgBox MaVariable
Loop
 
Ftxt.Close