HTMLEncode函数

来源:互联网 发布:网络教育托管是真的吗 编辑:程序博客网 时间:2024/06/01 09:57

function HTMLEncode(fString)
fString=replace(fString,";","&#59;")
fString=server.htmlencode(fString)
fString=replace(fString,"'","'")
fString=replace(fString,"--","--")
fString=replace(fString,"/","\")

fString=replace(fString,vbCrlf,"<br>")

HTMLEncode=fString
end function