复制代码 代码如下:
set wsh = createobject("wscript.shell")
wscript.sleep 15 * 60 * 1000
wsh.run "shutdown /s /t 0"
双击运行,居然弹出个错误对话框
复制代码 代码如下:
Line: 1
Char: 1
Error: Wrong number of arguments or invalid property assignment: ‘wsh'
Code: 800A01C2
Source: Microsoft VBScript runtime error
习惯了用VbsEdit写脚本,难道没有VbsEdit我就写不对VBS脚本了?一个字一个字地检查了一遍,没发现任何语法错误,但是双击就是报错,真是见鬼了!
传说声明变量是个良好的编程习惯,于是改成
复制代码 代码如下:
dim wsh
set wsh = createobject("wscript.shell")
wscript.sleep 15 * 60 * 1000
wsh.run "shutdown /s /t 0"
这次居然不报错了!怎么可能!VBS不是可以不声明变量的么!平时写的程序不都好好的么!
想了一下,发现平时用VbsEdit的时候变量名都是用编辑器自带snippets中的WshShell,莫非是变量名的问题?
复制代码 代码如下:
'Dim WshShell
Set WshShell = CreateObject("wscript.Shell")
WScript.Sleep 15 * 60 * 1000
WshShell.Run "shutdown /s /t 0"
这样也没有任何问题,看来是wsh这个变量名惹的祸。为什么不能用这个变量名呢?唯一的解释就是它是VBS内置的变量,而WScript也是VBS的内置变量,难道Wsh是WScript的别名?
Wsh.Echo "Hello world"
MsgBox Wsh.ScriptFullName测试结果和WScript一样,怎么会有这么变态的东西!我没有在哪本书上看到过,参考手册上也没有任何说明。
总结一下:
1、Wsh是WScript的别名
2、Dim可以消除VBS内置变量
3、不要以为自己的VBS水平很高
原文:http://demon.tw/programming/vbs-wsh-wscript.html