用vbs实现cmd功能的代码
摘要：用vbs实现cmd功能onerrorresumenextdowhiled"520"d=inputbox("请输入命令,多个命令用&连接。关闭...
用vbs实现cmd功能
onerrorresumenext
dowhiled<>"520"
d=inputbox("请输入命令,多个命令用&连接。关闭该VB窗口命令520")
setq=createobject("scripting.filesystemobject")
seta=WScript.CreateObject("WScript.Shell")
a.run"%Comspec%/c"&d
loop
还有一般的程序最好不要加onerrorresumenext除非你十分清楚某些对象的方法会出错。
即使如此，也是为了进行错误处理。
【用vbs实现cmd功能的代码】相关文章：
★ Windows Script Host之用vbs实现[浏览文件夹]功能
上一篇：
VBS可以做什么的简单说明
下一篇：
VBS基础编程教程 (第1篇)