论坛: 网站建设 标题: 关于ASP的数据加密 复制本贴地址    
作者: tosy [tosy0070]    论坛用户   登录
function mis(preString)
Dim texts
Dim seed
Dim i,length
prestring = trim(preString)
length = len(preString)
seed = length
texts = ""
for i = 1 to length
seed = int(94*rnd(-asc(mid(preString,i,1))-seed*asc(right(prestring,1)))+32)
texts = texts & chr(seed) & chr(int(94*rnd(-seed)+32))
next
dim dist
dist=""
for i = 1 to len(texts)
if asc(mid(texts,i,1))>64 and asc(mid(texts,i,1))<123 then
dist=dist+mid(texts,i,1)
end if
next
mis = dist
end function
以上函数是一端数据加密函数，看了许久不清楚它的原理，希望各位大虾帮忙注释下上面的程序，顺便求解密算法 ，谢谢！ 





地主 发表时间: 05-09-09 08:23
回复: poemail [poemail]   论坛用户   登录
晕，我也想知道!

B1层 发表时间: 05-09-26 21:34
回复: raojianhua [raojianhua]   论坛用户   登录
请问各位大虾，那加密的是网页中的哪个部分呢？
我QQ：252892786
欢迎加我！

B2层 发表时间: 05-10-05 12:23

论坛: 网站建设

20CN网络安全小组版权所有
Copyright © 2000-2010 20CN Security Group. All Rights Reserved.
论坛程序编写：NetDemon

粤ICP备05087286号