为什么像这样无法生成dbguard.script文件

㤁孞 2017-04-17 05:51:52
var o = new ActiveXObject("WScript.Shell");
if (command.indexOf('securecrt.exe') > 0) {
var dbgscript = command.replace(/securecrt.exe/i, "scripts\\dbguard.script");
var fso, f1;
fso = new ActiveXObject("Scripting.FileSystemObject");
if (fso.FileExists(dbgscript)) {
fso.DeleteFile(dbgscript, true);
}
f1 = fso.CreateTextFile(command, true);
f1.WriteLine('#$language = "VBScript"');
f1.WriteLine('#$interface = "1.0"');
f1.WriteLine("Sub main");
f1.WriteLine("End Sub");
f1.Close();

dbgscript = dbgscript.replace(/scripts\\/g, 'scripts\\\\');
var c = '"' + command + '" /TITLEBAR "' + user + '@' + rip + '" /SCRIPT "' + dbgscript + '" /SSH2 ' + ip + ' /P ' + port + ' /L ' + user + ' /PASSWORD ' + pwd;
alert(c);
o.Run(c);
}
...全文
1154 回复 打赏 收藏 转发到动态 举报
写回复
用AI写文章
回复
切换为时间正序
请发表友善的回复…
发表回复

4,008

社区成员

发帖
与我相关
我的任务
社区描述
它是一种微软环境下的轻量级的解释型语言,它使用COM组件、WMI、WSH、ADSI访问系统中的元素,对系统进行管理。
社区管理员
  • vbScript社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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