Question

ASP如何清除HTML代码中的a标签

客户在我的网站上发布信息时总喜欢,把自己公司的网址打上,怎么在发布信息时自动过滤a标签! 记录信息内容的字段是content,是用eWebEditor编辑的

Answer 1

<%
Function RemoveHTML(str)
Dim re
Set re=New RegExp
re.Pattern="<[a|A]+[^>]*>" '请参考学习正则表达式
re.IgnoreCase=True
re.Global=True
str=re.Replace(str,"")
Set re=Nothing
RemoveHTML=str
End Function

'测试
str = RemoveHTML(rs("content"))
response.write str
%>

Answer 2

replace(content,"</a>",text)

Answer 3

replace(content,"<a","<span")
replace(content,"</a>","</span>")
可以试试