正则过滤所有html内容但保留换行符

要过滤所有html内容但保留换行符<br>。看到这个需求，第一个想法就是使用正则来实现。经过在网上搜索一下，终于找到了，现在放到这里来分享。

<%

s="a<b>sp</b>编程网<br />测试<hr/>数据<BR>效果<a href='http://www.my0553.com.cn'>www.my0553.com.cn</a><br />代码"

response.write "替换前："&s

set rx=new RegExp

rx.IgnoreCase=true

rx.Global=true

rx.Pattern="<br[^>]*>"'先替换换行为其他特殊的内容，最后再反替换回来

s=rx.Replace(s,"___br___")

rx.Pattern="<[^>]+>"'替换所有标签

s=rx.Replace(s,"")

set rx=nothing

'反替换换行

s=replace(s,"___br___","<br/>")

response.write "<br><br>替换后："&s

%>

上一篇：ASP随机产生N位由数字和字母组成的密码

下一篇：芜湖网页设计：ASP正则去除html标签