asp调用内容替换html标签收藏

函数如下：

 

Function RemoveHTML(strText)
 Dim RegExs
 Set RegExs = New RegExp 
 RegExs.Pattern = "<[^>]*>"
 RegExs.Global = True 
 RemoveHTML = RegExs.Replace(strText, "")
End Function

 

使用方法：

 

直接RemoveHTML(内容)

这样就屏蔽了所有的html标签