asp加密解密函数decrypt
加密与解密函数
<%function decrypt(dcode)
dim texts
dim i
for i=1 to len(dcode)
texts=texts & chr(asc(mid(dcode,i,2))-i)
next
decrypt=texts
end function
function encrypt(ecode)
Dim texts
dim i
for i=1 to len(ecode)
texts=texts & chr(asc(mid(ecode,i,2来源gaodai#ma#com搞@代~码网))+i)
next
encrypt = texts
end function
%>
<%function decrypt(dcode)
dim texts
dim i
for i=1 to len(dcode)
texts=texts & chr(asc(mid(dcode,i,2))-i)
next
decrypt=texts
end function
function encrypt(ecode)
Dim texts
dim i
for i=1 to len(ecode)
texts=texts & chr(asc(mid(ecode,i,2来源gaodai#ma#com搞@代~码网))+i)
next
encrypt = texts
end function
%>
“>111111111
以上就是asp加密解密函数decrypt的详细内容,更多请关注gaodaima搞代码网其它相关文章!