[vbs] Problème avec la méthode ReadLine

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : [vbs] Problème avec la méthode ReadLine

hyperman22

Bonjour,

J'ai un problème avec la méthode ReadLine : Elle marche lors de la première exécution du script, mais si je réxécute le script une seconde fois, la méthode me renvoi l'ensemble du fichier au lieu d'uniquement la ligne en cours...

Pourquoi ????

Ci dessous une partie de mon script :

Code :

Dim OFS, MonFichier, FR
Set OFS = CreateObject("Scripting.FileSystemObject" )
Set Monfichier = OFS.GetFile(APPDATA & "\Microsoft\Signatures\toto.htm" )
Set FR = Monfichier.OpenAsTextStream( 1,0)
strhtml = ""
Actu = false
Do Until FR.AtEndOfStream
strLine = FR.ReadLine
if strLine="" Then
Actu = true
strhtml = strhtml & strActuSignature & Chr(13)
end if
if not Actu Then
strhtml = strhtml & strLine & Chr(13)
end if
if strLine="" Then
Actu = false
end if
loop
FR.close

Une idée ??

Merci...

Publicité

FORUM HardWare.fr

Programmation

VB/VBA/VBS

[vbs] Problème avec la méthode ReadLine

Sujets relatifs
Problème droits d'accès répertoire en C#	Probleme de date pour flux RSS
Problème avec la fonction "exec()"	Problème de mise à jour de formulaire
[Opengl] Problème d'éclairage	SWING - JAVA Problème avec des sous-panneaux
PROBLEME DE DATE LORS DE L'IMPORTATION SOUS EXCEL	Problème d'affichage d'un JCalendar
Caml , problème avec le carré	Problème sur mon site internet.
Plus de sujets relatifs à : [vbs] Problème avec la méthode ReadLine

Page générée en 0.069 secondes