Removendo HTML a partir do texto em ASP

Removendo HTML a partir do texto em ASP

 

Function RemoveHTML( strText )
    Dim nPos1
    Dim nPos2
    
    nPos1 = InStr(strText, "<")
    Do While nPos1 > 0
        nPos2 = InStr(nPos1 + 1, strText, ">")