[R] Ecrire dans un fichier (remplacement de chaine)
Posté : mar. 15 juil. 2008 13:58
Bonjour,
Je n'ai toujours pas réussi à résoudre ce petit pb.
Je re-ouvre donc un topic.
Je souhaite modifier une chaine de caractères dans un fichier, en la remplaçant par une autre.
J'ai donc commencé mon script comme suit :
1er pb : Ok pour lire le fichier jusque la ligne contenant "mdp=mdpDeX". Le msgbox s'execute bien. Mais la modif sur fichier ne se fait pas. Normal me direz vous puisque j'ouvre le fichier avec le param "0" (fileopen)
Mais si je l'ouvre avec le parametre "1", la msgbox ne s'affiche pas.
2e pb : Comment remplacer l'ancien mdp (mdpDeX) par le nouveau (mdpDey) ?
Cela fait 5 jours que je me bat avec fileopen et filewriteline mais je tourne en rond.
Je n'ai toujours pas réussi à résoudre ce petit pb.
Je re-ouvre donc un topic.
Je souhaite modifier une chaine de caractères dans un fichier, en la remplaçant par une autre.
J'ai donc commencé mon script comme suit :
Code : Tout sélectionner
dim $file = FileOpen ("c:\test\test1.txt",0)
dim $mdp, $read
While $read <> "mdp=mdpDeX"
$read = FileReadLine ($file)
WEnd
MsgBox (0,"",$read)
FileWriteLine ($file, "mdp=mdpDeY")Mais si je l'ouvre avec le parametre "1", la msgbox ne s'affiche pas.
2e pb : Comment remplacer l'ancien mdp (mdpDeX) par le nouveau (mdpDey) ?
Cela fait 5 jours que je me bat avec fileopen et filewriteline mais je tourne en rond.