Remplacer une chaine de caractere en vbs

Signaler
Messages postés
3
Date d'inscription
vendredi 10 septembre 2004
Statut
Membre
Dernière intervention
17 février 2006
-
Messages postés
3757
Date d'inscription
mardi 23 septembre 2003
Statut
Modérateur
Dernière intervention
13 mars 2006
-
bonjour,

tout ou presque est dans le sujet !!

J voudrais pouvoir ouvrir un fichier texte, rechercher un mot à l'interieur de ce fichier et le remplacer.

Comme je ne sais pas du tout comment faire, si vous avez un exemple cela m'intéresse

merci

2 réponses

Messages postés
15814
Date d'inscription
jeudi 8 août 2002
Statut
Modérateur
Dernière intervention
4 mars 2013
115
Voir les nombreuses sources de ce site qui parle d'ouverture de fichier...
_______________________________________

DarK Sidious

[Responsable API/VB du site www.ProgOtoP.com]
Téléchargez ProgOtoP API Viewer
Messages postés
3757
Date d'inscription
mardi 23 septembre 2003
Statut
Modérateur
Dernière intervention
13 mars 2006
16
Déjà vu, mais bon, pour la nième fois :

Private Sub Command1_Click()
Dim NumFic As Integer
Dim s As String
NumFic = FreeFile
Open "c:\temp\essai.txt" For Input As #NumFic
s = Input(LOF(NumFic), #NumFic)
Close
s = Replace(s, "toto", "truc")
Open "c:\temp\essai.txt" For Output As #NumFic
Print #NumFic, s
Close
End Sub


Cordialement, CanisLupus