已知加密函数,求一个相应解密函数,ASP高手帮助

ruihuo 2008-07-10 10:35:52
加密函数如下
function Epass(pass)
temppass=StrReverse(left(pass&"zxcvbnm,./",10))
templen=len(pass)
mmpassword=""
for j=1 to 10
mmpassword=mmpassword+chr(asc(mid(temppass,j,1))-templen+int(j*1.1))
next
Epass=replace(mmpassword,"'","B")
end function

...全文
127 4 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
wtogether 2008-07-11
  • 打赏
  • 举报
回复
没有解密的,这是不可逆的加密,它不是按每个字符加密的,而是只取10个字符,不足10个字符的补zxcvbnm,./,
ruihuo 2008-07-11
  • 打赏
  • 举报
回复
继续等到解密函数~~
zhanshanhu 2008-07-10
  • 打赏
  • 举报
回复
解密函数如下
function ReEpass(pass)
repass=replace(pass,"B","'")
mmpassword=""
for j=1 to 10
mmpassword=mmpassword+chr(asc(mid(temppass,j,1))+templen-int(j*1.1))
next
repass=StrReverse(mmpassword)
到这步我就不知道怎么判断了,因为密码长度不同.
end function
zhanshanhu 2008-07-10
  • 打赏
  • 举报
回复
我觉得这个算法有问题
pass&"zxcvbnm,./" 这个地方得到的值是什么?如果pass=123456,那么这里应该是:123456zxcvbnm,./ 然后left 之后是: 123456zxcv StrReverse之后: vcxz654321 下面的我没注意看.但如果pass=abcdefghijklmn,大于十位呢?那不是以前的密码都丢失了?既然这样解密就不存在了.

28,409

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧