捕获Wscript.Quit的退出码

1.vbs代码：
WScript.Sleep 1000
WScript.Echo "test"
WScript.Quit 5|

2.vbs代码：
Dim WshShell, oExec
Set WshShell = CreateObject("WScript.Shell")
Set oExec = WshShell.Exec("wscript.exe 1.vbs")
Do While oExec.Status = 0
WScript.Sleep 100
Loop
WScript.Echo oExec.ExitCode

如此就可以捕获1.vbs的退出码为5，2.vbs中的sleep语句是等待1.vbs执行的，去掉2中的sleep语句会显示为0而不是5了。

顺便说一下，Exec函数具有很多Run函数不具有的功能，Exec函数返回的是一个对象，故而具有更多功能（见下面），恰恰Run函数返回的仅仅是个数字，代表运行结果即返回值，所以2.vbs的代码当然也可以写成如下：
Dim WshShell, oExec
Set WshShell = CreateObject("WScript.Shell")
WScript.Echo WshShell.Run("wscript.exe ""C:\Documents and Settings\patrol\桌面\1.vbs""",,True)
注意这里1.vbs要使用绝对地址了，因为Wscript.exe默认其所在的目录为当前目录；另外一定要使用True。
附记：WshExec类具有属性ExitCode，ProcessID，Status，StdErr，StdIn，StdOut以及一个函数Terminate，这些属性和函数都很好理解。
Status属性具有三个值：
Const WshFailed = 2
Const WshFinished = 1
Const WshRunning = 0
关于Run的用法可以参见http://hi.baidu.com/patrolsun/blog/item/1695eb1fc851f608304e15ca.html

转载于:https://blog.51cto.com/officevba/243583

捕获Wscript.Quit的退出码相关推荐

获取 NodeJS 程序退出码
前言想要退出正在运行的 NodeJS 程序,我们既可以通过 Ctrl + C 的方式,也可以通过process.exit()来执行退出. 这两种操作都将强制进程尽快退出,即使仍有未完全完成的异步操作 ...
读取用户的输入，直到输入quit时退出
今天面试时碰到了一个机试题,记录一下: 读取用户的输入,直到输入quit时退出把String类型转换为Integer类型当输入为1时,返回true,输入不为1时返回false 不可用一个try.c ...
如何获取程序返回值，退出码，错误码
在c/C++语言程序设计中,我们可能经常性的需要进行错误处理,异常处理等问题. 关于异常部分,主要就是C++异常了. 今天我们主要谈论c语言方面的一些问题:如何获取程序返回值,退出码,错误码. 1如何 ...
git 未能顺利结束（退出码1）
按照这个博客上安装完小乌龟git后:https://blog.csdn.net/jdsjlzx/article/details/51098588 win10下安装完乌龟git后无法上传文件进行文件上 ...
vue 下载文件流和捕获后端返回的状态码和错误信息的方法
文件流下载需要注意的是 responseType: 'blob' ,否则下载的文件不能正确打开.但是当数据库返回400时,捕获不到error的错误信息,因为responseType设置了固定的返回格式 ...
mysql exit quit_MySQL数据库5.5基础 exit quit \q 退出MySQL数据库
本文主要向大家介绍了MySQL数据库5.5基础 exit quit \q 退出MySQL数据库 ,通过具体的内容向大家展现,希望对大家学习MySQL数据库有所帮助. 数据.数据,命根就在数据.操作数据 ...
退出码 -1073740791 (0xC0000409)
代码:run_demo4.py 运行结果:所有程序print都正常,但是在用pandas保存二维数组DataFrame时报错,无法保存. 错误类型:退出码 -1073740791 (0xC000040 ...
php exit code 255,使用exit(-1)为什么得到255退出码?
今天有人在微博上问了一个问题, 使用: string exec ( string $command [, array &$output [, int &$return_var ]] ) ...
关于Qt退出码255的一点总结
Qt程序退出码255 先说症状,程序运行正常,但是在关闭程序时,却出现的异常,提示退出码为255.查看了一翻代码,也没有找到有什么问题,百度上也没找到有效的解决方法.后来偶然发现了问题所在,原因是在析 ...

捕获Wscript.Quit的退出码

捕获Wscript.Quit的退出码相关推荐

最新文章

热门文章