ASP常用函数:HTMLDecode

<%
Function HTMLDecode(sText)
    Dim I
    sText = Replace(sText, "&" , Chr(38))
    sText = Replace(sText, """", Chr(34))
    sText = Replace(sText, "<" , Chr(60))
    sText = Replace(sText, ">" , Chr(62))
    sText = Replace(sText, " ", Chr(32))
    For I = 1 To 255
        sText = Replace(sText, "&#" & I & ";", Chr(I))
    Next
    HTMLDecode = sText
End Function
%>
您可能感兴趣的文章:Javascript UrlDecode函数代码mysql仿oracle的decode效果查询PHP 小心urldecode引发的SQL注入漏洞php urlencode()与urldecode()函数字符编码原理详解Javascript生成json的函数代码(可以用php的json_decode解码)js中escape对应的C#解码函数 UrlDecodePHP json_decode函数详细解析SQL中 decode()函数简介

函数 ASP