ASP函数:移除HTML代码

ASP移除所有HTML代码的函数

Function RemoveHTML( strText )
Dim RegEx
Set RegEx = New RegExp
RegExPattern = "<[^>]*>"
RegExGlobal = True
RemoveHTML = RegExReplace(strText "")
RemoveHTML = replace(RemoveHTML" "" ")
End Function