Supprimer html

Résolu
quiaimeflash Messages postés 270 Date d'inscription samedi 29 novembre 2003 Statut Membre Dernière intervention 11 juillet 2007 - 25 sept. 2004 à 17:57
quiaimeflash Messages postés 270 Date d'inscription samedi 29 novembre 2003 Statut Membre Dernière intervention 11 juillet 2007 - 25 sept. 2004 à 18:45
Bonjour,

Je sais que sa doit etre tout bête, c'est de la manipulation de chaine, mais je sais pas faire...
J'aimerais pouvoir supprimer tous les tags (balises HTML) d'une chaine.

En claire passer de :
Mon texte
à
Mon texte

Donc, si quelqu'un a ptit bout de code
Merci..

2 réponses

cs_rene38 Messages postés 1858 Date d'inscription samedi 29 juin 2002 Statut Membre Dernière intervention 17 octobre 2013 11
25 sept. 2004 à 18:40
Bonjour
essaie ceci :

Dim i As Long, j As Long
Do
   i = InStr(chaine, "<")
   j = InStr(chaine, ">")
   If i = 0 Then Exit Do
   chaine = Left$(chaine, i - 1) & Mid$(chaine, j + 1)
Loop
3
quiaimeflash Messages postés 270 Date d'inscription samedi 29 novembre 2003 Statut Membre Dernière intervention 11 juillet 2007
25 sept. 2004 à 18:45
Un grand merci, car sa marche super... C'était exactement ca !
0
Rejoignez-nous