[VBS] Sauvegarder variable .txt
Bonjour,
Je suis debutant en vbs, je creer un script qui se lance avec le pc (donc au demarage de windows). Il y a un inputbox qui demande le nom de l'utilisateur, tout fonctionne bien... Mais moi je voudrais bien qu'il sauvegarde le nom dans un fichier texte. mon code:
Donc je cherche a sauvegarder la variable 'usrwin' qui contient le nom dans un ficher .txt
Merci d'avance
--
"Pour poster une réponse, appuyez sur la touche 'F13' " !!!
Non ne le cherchez pas...
Je suis debutant en vbs, je creer un script qui se lance avec le pc (donc au demarage de windows). Il y a un inputbox qui demande le nom de l'utilisateur, tout fonctionne bien... Mais moi je voudrais bien qu'il sauvegarde le nom dans un fichier texte. mon code:
do
usrwin = InputBox ("Quel est votre nom?", "Login", "Jean Luc")
loop while usrwin = ""
MsgBox "Bonjour " & usrwin & " !"
Donc je cherche a sauvegarder la variable 'usrwin' qui contient le nom dans un ficher .txt
Merci d'avance
--
"Pour poster une réponse, appuyez sur la touche 'F13' " !!!
Non ne le cherchez pas...
1 réponse
-
Bonjour,
Voici un extrait de l'aide :
Dim fso, MyFile Set fso = CreateObject("Scripting.FileSystemObject") Set MyFile= fso.CreateTextFile("c:\testfile.txt", True) MyFile.WriteLine("This is a test.") MyFile.Close
Dans ton cas, il faut donc remplacerMyFile.WriteLine("This is a test.")
parMyFile.WriteLine(usrwin)
@+
Expérience: nom dont les hommes baptisent leurs erreurs.
Oscar Wilde-
-
-
Bonjour,
Oui, si ton fichier existe, il faut l'ouvrir et non le créer :Const ForReading = 1, ForWriting = 2, ForAppending = 8 Dim fso, f Set fso = CreateObject("Scripting.FileSystemObject") Set f = fso.OpenTextFile("c:\testfile.txt", ForAppending, True) f.Write usrwin f.Close
Pour t'aider, je te conseille de télécharger le fichier script56.chm par exemple à l'adresse :
http://www.microsoft.com/download/en/details.aspx?displaylang=en&id=2764
@+ -
-
-
