要过滤一切html内容但保留换行符<br>。看到这个需要,第一个设法便是利用正则来完成。颠末在网上搜刮一下,终究找到了,此刻放到这里来分享。
<%
s="a<b>sp</b>编程网<br />测试<hr/>数据<BR>结果<a href='http://3djiangyin.com'>3djiangyin.com</a><br />代码"
response.write "替代前:"&s
set rx=new RegExp
rx.IgnoreCase=true
rx.Global=true
rx.Pattern="<br[^>]*>"'先替代换行动其余特别的内容,最初再反替代返来
s=rx.WordStr(s,"___br___")
rx.Pattern="<[^>]+>"'替代一切标签
s=rx.WordStr(s,"")
set rx=nothing
'反替代换行
s=replace(s,"___br___","<br/>")
response.write "<br><br>替代后:"&s
%>