ASP正则表达式过滤函数，可过滤指定的HTML标签，如果需要过滤特定的HTML标签，只需要修改下正则表达式即可过滤。下面青岛星网跟大家分享：ASP正则过滤HTML标签的函数代码。
Function LoseHtml(ContentStr) Dim ClsTempLoseStr,regEx ClsTempLoseStr = Cstr(ContentStr) Set regEx = New RegExp regEx.Pattern = "<\/*[^<>]*>" regEx.IgnoreCase = True regEx.Global = True ClsTempLoseStr = regEx.Replace(ClsTempLoseStr,"") LoseHtml = ClsTempLoseStr End function
下面是收集的一些正则表达式过滤集，相信非常实用，用着复制进去就行了。
正则表达式 过滤 style 标记 ：
regEx.Pattern = "(<style)+[^<>]*>[^\0]*(<\/style>)+"
正则表达式 过滤 层 div 标记 ：
regEx.Pattern = "<(\/){0,1}div[^<>]*>"
正则表达式 过滤 链接 a 标记 ：
regEx.Pattern = "<(\/){0,1}a[^<>]*>"
正则表达式 过滤 字体 font 标记 ：
regEx.Pattern = "<(\/){0,1}font[^<>]*>"
正则表达式 过滤 span 标记 ：
regEx.Pattern = "<(\/){0,1}span[^<>]*>"
正则表达式 过滤 object 标记 ：
regEx.Pattern = "<object.*?/object>"
正则表达式 过滤 iframe 标记：
regEx.Pattern = "(<iframe){1,}[^<>]*>[^\0]*(<\/iframe>){1,}"
正则表达式 过滤 script ：
regEx.Pattern = "(<script){1,}[^<>]*>[^\0]*(<\/script>){1,}"
正则表达式 过滤 Class 标记 ：
regEx.Pattern = "(class=){1,}(""|\'){0,1}\S+(""|\'|>|\s){0,1}"
在线QQ：
