精美而实用的网站，关注web编程技术、网站运营、SEO推广，让您轻松愉快的学习

在ASP中清理HTML内容，把所有带有链接、图像、段落标记、表格等HTML标签的元素全部清理掉，只剩下文字，可以用于采集时标签之间HTML内容清理。

ASP清除HTML正则函数

Public Function Replacehtml(tstr)
  Dim Str,re
  Str=Tstr
  Set re=new RegExp
   re.IgnoreCase =True
   re.Global=True
   re.Pattern="<(p|\/p|br)>"
   Str=re.Replace(Str,vbNewLine)
   re.Pattern="<img.[^>]*src(=| )(.[^>]*)>"
   str=re.replace(str,"")
   re.Pattern="<(.[^>]*)>"
   Str=re.Replace(Str,"")
   Set Re=Nothing
   Replacehtml=Str
 End Function

使用方法：content=Replacehtml(content)

Tags：ASP HTML 函数