Suite à une demande sur le forum, voici une petite function qui permet de virer les balises HTML en quelques lignes. Les expressions régulière sont rapides et puissantes, et puis.... pas la peine de réinventer la roue... Un fichier de syntaxe sur les expressions régulière est joint au source (NON je ne fournis pas l'aspirine).
Source / Exemple :
' Retourne la chaine dénudée de ses balises html
Public Function enleveMoiLesBalisesHTML(chaine As String)
Dim regExp As VBScript_RegExp.regExp
Set regExp = New VBScript_RegExp.regExp
regExp.Pattern = "<(.*)>" ' Définition de la balise HTML
regExp.Global = True ' On traite toute la chaine
enleveMoiLesBalisesHTML = regExp.Replace(chaine, "")
End Function
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.