OVH Cloud OVH Cloud

FSO : comment éditer un texte?

1 réponse
Avatar
Alexis Perdaen
Bonjour,
J'utilise depuis qques temps déjà le FileSystemObject pour lire le contenu
de fichiers.
Comment faire pour modifier le contenu d'un fichier texte?

Par exemple, mon fichier contient le texte suivant :
Temperature = 5 oC
Humidity = 95 %


et je dois le faire devenir :
Temperature = 12 oC
Humidity = 91 %

Merci d'avance...

1 réponse

Avatar
François Picalausa
Bonjour/soir,

Apprès avoir lu la fiche suivante de la faq:
http://faq.vb.free.fr/index.php?question1

Je te conseille de jetter un oeil à Open For Binary As:
Dim strFileContent As String, FFN As Integer

FFN = FreeFile

Open "c:windowswinhelp.exe" For Binary As FFN
strFileContent = String$(LOF(FFN), Chr$(0))
Get FFN, , strFileContent 'Lire
Close FFN

...

FFN = FreeFile

Open "c:windowswinhelp.exe" For Binary As FFN
Put FFN, , "Nouveau texte" 'Ecrire
Close FFN


--
François Picalausa (MVP VB)
FAQ VB : http://faq.vb.free.fr
MSDN : http://msdn.microsoft.com


Alexis Perdaen wrote:
Bonjour,
J'utilise depuis qques temps déjà le FileSystemObject pour lire le
contenu de fichiers.
Comment faire pour modifier le contenu d'un fichier texte?

Par exemple, mon fichier contient le texte suivant :
Temperature = 5 oC
Humidity = 95 %


et je dois le faire devenir :
Temperature = 12 oC
Humidity = 91 %

Merci d'avance...