强制用Wscript.exe或Cscript.exe来运行VBS脚本

文章来源

VBS脚本有两种运行方式，一种是基于GUI的Wscript.exe来运行，另一种是基于命令行的Cscript.exe来运行。通常的情况下，我们都是通过双击VBS脚本来直接运行脚本的，一般情况下这样做会是用Wscript.exe来执行脚本，（当然这个双击后的默认行为我们是可以改变的），但有时候我们编写的一些脚本，例如一些有大量输出的脚本，我们会期望用Cscript.exe来执行，这样可以很方便地看到输出信息，如果这样的脚本用Wscript.exe来执行，可能你就得点好多次确定按钮了，这不但麻烦而且也不方便察看脚本的输出。另外有些脚本，需要和用户有更多的互动，这样的脚本应该是用Wscript.exe来执行的，可是有时候执行的人如果将它在命令行上用Cscript.exe来执行（虽然这种情况可能相对较少），也就达不到原来的效果了。那么，有没办法避免这种错误，就是本来设计在命令行上运行的脚本被用Wscript.exe来执行，或者本来设计在GUI上运行的脚本被用在命令行上执行呢？能不能在我们的脚本上做个判断，判断当前运行脚本的引擎是什么，然后强制性地用我们指定的引擎来运行呢？

下面就提供两个示例，分别是强制用Cscript.exe执行和强制用Wscript.exe执行，供大家参考。

示例一，强制用Wscript.exe执行：

SET Wshell=CreateObject("Wscript.Shell")

if lcase(right(Wscript.fullName,11)) = "cscript.exe" then 
	Wscript.echo "发现你丫竟然用Cscript.exe运行我？！,你太过分了！"
	Wshell.run "wscript.exe //nologo " & chr(34) & wscript.scriptfullname & chr(34)
	Wscript.quit
else
	Wscript.echo "现在是用WScript.exe来运行，做你想做的事！"
end if

示例二，强制用Cscript.exe执行：

SET Wshell=CreateObject("Wscript.Shell")

if lcase(right(Wscript.fullName,11)) = "wscript.exe" then 
	Wshell.Popup "发现你丫竟然用Wscript.exe运行我？！", 5, "你太过分了！", 48
	Wshell.run "cmd /k cscript.exe //nologo " & chr(34) & wscript.scriptfullname & chr(34)
	Wscript.quit
else
	Wscript.echo "现在是用CScript.exe来运行，做你想做的事！"
end if

如果你没有修改过默认的脚本执行引擎，那么默认情况下，双击VBS会是用WScript.exe来执行，所以你直接双击示例二，就会看到效果，弹出提示窗口后，5秒钟后对话框关闭，转到用Cscript.exe来执行，如果你在命令行上直接用Cscript.exe来执行，就不会有提示，直接执行Else部分。同样的道理，如果你把示例一放在命令行上用Cscript.exe来执行，也会看到显示提示语后，转到用Wscript.exe来执行，而如果你直接双击，就只执行Else部分。

至于真正的应用，你可以根据要强制选择的引擎，以上面这两个脚本为模板，把你的实际代码放在Else和end if之间就行了。