九制香附丸:asp如何清除html代码

来源:百度文库 编辑:神马品牌网 时间:2024/05/15 08:34:32
function clearHTMLCode(originCode)
dim reg
set reg = new RegExp
reg.Pattern = "<[^>]*>"
reg.Global = true
clearHTMLCode = reg.Replace(originCode, "")
end function//楼下这里拼写有误,十分感谢!

用正则表达式,我写一个VBScript函数给你。
<%
function clearHTMLCode(originCode)
dim reg
set reg = new RegExp
reg.Pattern = "<[^>]*>"
reg.Global = true
clearHTMLCode = reg.Replace(originCode, "")
end fucntion
%>