一聚教程网:一个值得你收藏的教程网站

热门教程

asp过滤html代码函数

时间:2022-07-02 23:20:06 编辑:袖梨 来源:一聚教程网

只简单的写了一些,

function html_encode(html)
dim temp
temp=replace(html,"<","<")
temp=replace(temp,">",">")
temp=replace(temp,"'","单引号")
temp=replace(temp,chr(13),"
")
html_encode=replace(temp,chr(32)," ")
end function
'*********************************************************
function encode_html(encode)//这个是在输出时再还原以前处理过了.
dim temp
temp=replace(encode,"<","<")
temp=replace(temp,">",">")
temp=replace(temp,"单引号","'")
temp=replace(temp,"
",chr(13))
encode_html=replace(temp," ",chr(32))
end function

热门栏目