当前位置： 移动技术网 > IT编程>脚本编程>VBScript > VBS 偏移量解密工具[算法解密]

VBS 偏移量解密工具[算法解密]

2017年12月08日  | 移动技术网IT编程  | 我要评论
复制代码 代码如下:

if wscript.arguments.count=0 or wscript.arguments.count>1 then
msgbox "请将通过偏移量加密过的 vbs 文件拖放到本脚本上即可[请逐个解密]！",48,"提示"
wscript.quit
end if

for each fname in wscript.arguments
if right(fname,3)<> "vbs" then
msgbox "请选择 vbs 文件!",64,"提示"
wscript.quit
else
set fso=createobject("scripting.filesystemobject")
set objf=fso.opentextfile(fname)
str=objf.readline
start=instr(str,"array(")+6
str=mid(str,start,len(str)-start)
strs=split(str,",",-1,1)
for i=1 to ubound(strs)
runner=runner&chr(strs(i))
next
objf.close
set objf=fso.opentextfile(fname,2)
objf.write runner
msgbox "解密成功",64,"提示"
end if
next

您可能感兴趣的文章:

如对本文有疑问， 点击进行留言回复！！

相关文章:

验证码：
最近更新的文章
大家感兴趣的文章
移动技术网