减小字体
增大字体- ·上一篇文章：eMule的config备份工具
- ·下一篇文章：终端登陆监视脚本
- ·百度中搜索更多的关于“FlashFXP解密 VBS版本”相关内容
- ·谷歌中搜索更多的关于“FlashFXP解密 VBS版本”相关内容
- ******申明******
- 本站文章内容有部分为收录网络中其他网友内容，DOS资源站不保证所有的代码都适合你使用。
- 由于编辑匆忙，有可能造成某些脚本文件出现丢失代码或代码无法运行的情况，请网友根据情况自行修改。
- 如果能将出错部分反馈给我，那就更好了。
FlashFXP解密 VBS版本
Function Decrypt(password)
magic = Split("121,65,51,54,122,65,52,56,100,69,104,102,114,118,103,104,71,82,103,53,55,104,53,85,108,68,118,51", ",")
chrlast = cint("&H" & Mid(password, 1, 2))
magicnum = 0
For X = 3 To Len(password) Step 2
chrtmp = cint("&H" & Mid(password, X, 2))
chrresulta = (chrtmp Xor magic(magicnum))
chrresultb = chrresulta - cint(chrlast)
If chrresultb > 255 Or chrresultb < 0 Then
chrresultb = chrresultb - &HFFFFFF01
End If
chrlast = chrtmp
pwdtmp = pwdtmp & Chr(chrresultb)
magicnum = magicnum + 1
If magicnum > 27 Then
magicnum = 0
End If
Next
Decrypt = pwdtmp
End Function
wscript.echo Decrypt("0915CD7698B5A8D4340D015E")
