codice:
function StripHTML(asHTML)
    	Dim loRegExp	' Regular Expression Object
    	
    	' Create built In Regular Expression object
    	Set loRegExp = New RegExp
		loRegExp.Global = True
    	' Set the pattern To look For HTML tags
    	loRegExp.Pattern = "<[^>]*>"
    	
    	' Return the original String stripped of HTML
    	StripHTML = loRegExp.Replace(asHTML, "")
    	
    	' Release object from memory
    	Set loRegExp = Nothing
    End function
Questa dovrebbe levarti tutto l'html.