【Asp】Asp HTML编码与解码 Asp转义字符

Asp HTML编码，Asp转义字符：

Function EncodeHTML(str)
str = Replace(str, ">", ">")
str = Replace(str, "
str = Replace(str, Chr(34), """)
EncodeHTML = str
End Function
%>

Asp HTML解码，Asp转义字符：

Function DecodeHTML(str)
str = Replace(str, ">", ">")
str = Replace(str, "<", "
str = Replace(str, """, Chr(34))
DecodeHTML = str
End Function
%>