Fonction supprimant les tags sgml avec les expressions régulières

Commenter

Contenu du snippet

Cette fonction supprime tout code du type <nomBalise>, <nomBalise/>, </nomBalise> d'une chaine passée en parametre et retourne la chaine épurée. Les balises épurées peuvent contenir ou non des attributs. Elle me sert a supprimer tout balisage HTML.

Source / Exemple : 


function delTag(strg)
	Dim regEx
	set regEx = new regExp
	regEx.IgnoreCase = True
	regEx.Pattern = "^</*([^<>\s]*)(\s[^<>]*)?>|<([^<>\s]*)(\s[^<>]*)?/*>"
	while regEx.Test(strg)
		strg = regEx.Replace(strg, "")
	wend
	deltag = strg
end Function

Conclusion :


Si vous connaissez mieux, ou trouvez des bugs dites le moi

A voir également

S'inscrire maintenant

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.

Du même auteur (cs_garfield90)