VBS基础篇 - wscript 对象详解

2019-01-15 19:15:46刘景俊

在下例中,FIGMENT 是一个绘图应用程序的名称,DRAWING 是它支持的对象类型之一。

Dim MyObject As Object
Set MyObject = GetObject("C:DRAWINGSSAMPLE.DRW", "FIGMENT.DRAWING") 

3、Quit 方法

描述:退出执行,返回指定的错误代码。
语法:object.Quit [intErrorCode]
解释:object 必选项。 WScript 对象。
        intErrorCode可选项。如果包含此参数,WScript 将把它作为进程终止码返回。如果省略了 intErrorCode,WScript 将返回零 (0) 作为进程终止码。
例子:
下例退出执行并返回错误代码 1:

WScript.Quit
 
4、Sleep 方法

描述:使脚本进程在指定的毫秒数内处于非活动状态,然后继续执行。
语法:object.Sleep(intTime)
参数:object必选项。WScript 对象。
         intTime脚本进程在非活动状态的时间长度,以毫秒为单位。
说明:在睡眠状态下,脚本将继续执行所处理的事件。如果脚本引擎超时或被中断,睡眠将立即结束。
例子:

wscript.sleep(3000) Set apprun = CreateObject("wscript.shell") apprun.run "%windir%notepad.exe"

此例子将会延迟3秒启动记事本。

5、timeout 方法

描述:设置脚本的生存时间
语法:wscript.timeout
例子:

wscript.timeout = 10 MsgBox "hello"

6、Echo 方法

描述:将输出发送到对话框或控制台。
语法:object.Echo [Arg1] [,Arg2] [,Arg3] ...
参数:object必选项。WScript 对象。
        Arg1, Arg2, Arg3 ...所显示的项的列表。
说明:如果宿主为 WScript.exe,本方法将把输出显示在对话框中;如果宿主为 CScript.exe,结果将显示在控制台上。每一项将被一个空格隔开。 在 CScript.exe 下,输出的末尾被加上换行符。如果未提供任何项,显示的将是空行。
例子:

Set fso = CreateObject("scripting.filesystemobject") Set f = fso.OpenTextFile("c:test.txt") wscript.echo f.ReadAll

将会显示这个文件里面的所有内容。这么看来,他的功能跟msgbox一样,不过不如他强大。

7、ConnectObject 方法

描述:将一个对象事件源连接到具有给定前缀的函数。
语法:object.ConnectObject strObject, strPrefix
参数:object必选项。WScript 对象。
        strObject要连接的对象的名称。
        strPrefix事件函数的前缀。
说明:
对象必须能够枚举自己类的事件集合。

例子:下例实例化了一个假想的对象,并将其连接到脚本文件。然后脚本调用该对象的 "SomeMethod" 方法。如果对象中发生了名为 "Event"的事件,将调用 MyEvent_Event 子例程。