[VBS] Sauvegarder variable .txt

denstieven Messages postés 663 Date d'inscription   Statut Membre Dernière intervention   -  
 Thor2003 -
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: 

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





A voir également:

1 réponse

Réponse 1 / 1
Gord21 Messages postés 918 Date d'inscription   Statut Membre Dernière intervention   289
 
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 remplacer 
MyFile.WriteLine("This is a test.")

par 
MyFile.WriteLine(usrwin)


@+
Expérience: nom dont les hommes baptisent leurs erreurs.
Oscar Wilde
2
denstieven Messages postés 663 Date d'inscription   Statut Membre Dernière intervention   41
 
Merci! Fonctionne bien! Vraiment merci! Bonne vacances encore ;)
0
denstieven Messages postés 663 Date d'inscription   Statut Membre Dernière intervention   41
 
Le seul problème c'est que quand le fichier existe déjà ca efface le contenu qu'il y a dedans et le remplace par le nouveau nom. Tu connais une solution ?
0
Gord21 Messages postés 918 Date d'inscription   Statut Membre Dernière intervention   289
 
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

@+
0
denstieven Messages postés 663 Date d'inscription   Statut Membre Dernière intervention   41
 
Ok merci!
0
Thor2003
 
merci pour c réponce mais comment séparer, sauter une ligne, uhn espace lor de l'ecriture
0

Discussions similaires

vérifiez la variable d'environnement TEMP
erwan38 -
F4 -

72 réponses
Faire une pause en VBS
quent -
quent -

3 réponses
VBA : Range avec références variables..
Antoine -
MIKE59 -

7 réponses