Bonjour.

Je suis en train de décortiquer un fichier source d'une page html et je voudrais savoir comment supprimer tout ce qui ce trouve entre 2 balises

ex: <toto va bien>

<il fait beau>

je veux remplacer tout ça par ""

text= replace(masource, 'la je sais pas',"")

merci

le html peut être considérer comme un document xml
une solution pourrait être de le parser (DOM)

Bosoir,
As-tu essayer le code que je t'ai mis sur developpez.com ??
Il agit diectement dans le fichier, dans l'exemple c'est un fichier .txt, essaye avec ton fichier htm(perso, je n'en ai pas sur mon ordi.)
Je te remet quand même le code.

Private Sub Command1_Click()
Dim texte
Open "c:\Text1.txt" For Input As #1
texte = Input(LOF(1), 1)
Close #1
texte = Replace(texte, "<", "")
texte = Replace(texte, ">", "")
Open "c:\Text1.txt" For Output As #1
Print #1, texte
Close #1
End sub

jpleroisse

Si une réponse vous convient, cliquez Réponse Acceptée.