ASP常用函数:自定义加密和解密函数[站长亲测]推荐 亲测 收藏

文章标签: ASP常用函数
  • :
  • 01-22 18:27
  • :
  • 50次
  • :
  • 0条
  • 2赞

简介ASP里用来加密和解密字符串的函数及使用方法实例。

在ASP里,如果我们要对一个变量字符串进行加密,并且可以解密,就会用到本篇文章站长要分享给大家的ASP函数了。

不说废话,先来看具体的源码:

Function aijQuery_EnCode(text)
    const key="aj" '自定义密钥
    dim str : str=key & text '密钥与字符结合
    dim str1
    dim str2
    for i=1 to len(str)
        'asc函数:返回字符串的第一个字母对应的ANSI字符代码
        'AscW函数:返回每一个GB编码文字的Unicode字符代码
        'hex函数:返回表示十六进制数字值的字符串
        str2=hex(AscW(mid(str,i,1)))
        for j=1 to 4-len(str2)
            str2="0" & str2 '每个字符都转成4位编码
        next
        str1=str1 & str2
    next
    aijQuery_EnCode=StrReverse(str1) '将字符串倒序排列
End Function
Function aijQuery_DeCode(text)
    const key="aj" '自定义密钥,需和加密时的密钥相同
    dim str : str=text
    dim str1
    dim str2 : str2=StrReverse(str) '将字符串倒序排列
    for i=1 to len(str2) step 4 '4位编码为一个字符
        'cint函数:将Variant类型强制转换成int类型
        'chr函数:返回数值对应的ANSI编码字符
        'ChrW函数:返回数值对应的Unicode编码字符
        str1=str1 & ChrW(cint("&H" & mid(str2,i,4)))
    next
    aijQuery_DeCode=mid(str1,len(key)+1,len(str)-len(key))
End Function

下面是站长亲测的一个实例:

<%
dim a:a=aijQuery_EnCode("爱jQuery")
response.write "爱jQuery 加密码结果为:<br>"&a &"<br>"
response.write "解码后为:<br>"&aijQuery_DeCode(a)
%>

亲测的结果如下:



您正在找的文章可能是: