导读： ASP移除所有HTML代码的函数Function RemoveHTML( strText )Dim RegExSet RegEx = New RegExpRegEx.Pattern =...
ASP移除所有HTML代码的函数
Function RemoveHTML( strText )
Dim RegEx
Set RegEx = New RegExp
RegEx.Pattern = "<[^>]*>"
RegEx.Global = True
RemoveHTML = RegEx.Replace(strText, "")
RemoveHTML = replace(RemoveHTML," "," ")
End Function
