Utilisation .txt avec du VBScript

Résolu
ElexXVII Messages postés 45 Date d'inscription   Statut Membre Dernière intervention   -  
ElexXVII Messages postés 45 Date d'inscription   Statut Membre Dernière intervention   -
Yo tout le monde, je suis en train de créé un programme vbs avec un systeme de sauvegarde dans un fichier txt (pour sauvegarder une variables) :

Dim fso, MyFile
Set fso = CreateObject("Scripting.FileSystemObject")
Set MyFile = fso.CreateTextFile("C:\save.txt")
MyFile.WriteLine(variable)
MyFile.Close

Dans mon programme il y a une boucle qui sauvegarde "variable" !

Voila et je voudrait que le programme aille rechercher la valeur sauvegarder dans le fichier txt au lancement du programme mais je ne sais pas comment faire !
Merci de m'aider !

EDIT: Ajout de la coloration syntaxique.

2 réponses

cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   729
 
Yo tout seul,

Essaie ceci:

Set Fso = CreateObject("Scripting.FileSystemObject")
Set InFile = fso.OpenTextFile("azerty.Txt")'nom fichier texte
Const ForReading = 1
Do While Not (InFile.atEndOfStream)
strComputer = InFile.ReadLine
Loop
msgBox  strComputer 

0
ElexXVII Messages postés 45 Date d'inscription   Statut Membre Dernière intervention   1
 
Merci je vais esseyer
0
ElexXVII Messages postés 45 Date d'inscription   Statut Membre Dernière intervention   1
 
Sa fonctionne merci
0