VBS基础篇 - wscript 对象

一、wscript对象

描述：提供对 Windows 脚本宿主对象模型根对象的访问。
详述：WScript 对象是 Windows 脚本宿主对象模型层次结构的根对象。它可在任何脚本文件中使用，不需要特定的声明。
        WScript 对象提供对以下信息的访问命令行参数， 脚本文件的名称，宿主文件名， 宿主版本信息。
        WScript 对象可用来创建对象，连接对象， 与对象断开连接， 同步事件， 以编程方式停止脚本的执行，将信息输出到默认输出设备（Windows 对话框或命令控制台）。

WScript 对象也可用来设置脚本运行的模式（交互模式或批处理模式）。
        就像刚才我们说的一样，对象通过两种其自有的特性想我们提供工具，这两种特性分别是“属性”和“方法”。

二、属性

1、Arguments 属性

描述：用于返回 Arguments 对象（这个对象我们以后会学，现在只需要了解就行）。
语法：object.Arguments
参数：object ，WScript 对象

例子：显示本vbs文件运行的参数

Set Arg = WScript.Arguments
For i =  To Arg.Count -
   MsgBox Arg(i)
Next

将上面这些代码保存为vbs文件，然后将一个或者数个任意的文件拖放到这个vbs文件上面上，那么他会逐个显示你拖放的文件。（这仅仅给出了一个实例，用到了Arguments对象，其的具体用法我们以后再了解）

2、FullName 属性

描述：返回主机可执行文件（CScript.exe 或 WScript.exe）的完全限定路径。
语法：object.FullName
参数：object ，WScript 对象

例子：显示本机wscript的路径
MsgBox wscript.fullname
在默认的情况下会显示"C:\WINDOWS\system32\wscript.exe"

3、Interactive 属性

描述：设置或确定脚本模式。
语法：object.Interactive
参数：object ，WScript 对象
说明：Interactive 属性返回一个布尔值。

有批处理和交互两种模式。在交互模式（默认模式）下，该脚本为用户提供交互功能。启用对 Windows 脚本宿主的输入和输出。该脚本可以将信息显示在对话框中并等待用户提供反馈。在批处理模式下，不支持这种类型的用户交互,所有对 WSH 的输入和输出被禁用。还可以使用 Windows 脚本宿主命令行开关 / / I（对于交互式）和 / / B（对于批处理模式）来设置脚本模式。

例子：显示本机的脚本模式
MsgBox WScript.Interactive

4、Name 属性
描述：返回 WScript 对象（主机可执行文件）的名称。
语法：object.Name
参数：object ，WScript 对象
例子：
MsgBox WScript.name

5、Path 属性

描述：返回包含主机可执行文件（CScript.exe 或 WScript.exe）的路径名称
语法：object.Path
参数：object ，WScript 对象
例子：
MsgBox WScript.Path
如果你的wscript.exe是在”C: \ WINDOWS \ system32 \ wscript.exe“那么本属性会显示”C: \ WINDOWS \ system32“

6、ScriptFullName 属性

描述：返回当前运行脚本的完整路径。
语法：object.ScriptFullName
参数：object ，WScript 对象
例子：显示本vbs的完整路径
MsgBox WScript.ScriptFullName

神奇吧，这个vbs竟然知道他自己的名字。

7、ScriptName 属性

描述：返回当前运行脚本的文件名。
语法：object.ScriptName
参数：object ，WScript 对象
说明：刚才我们知道了用ScriptFullName可以获取vbs文件自身的完整路径，加入你只想要这个文件的名字改怎么办？看例子。
例子：显示本VBS文件的名字
MsgBox WScript.ScriptName
怎么样？看到了吗？

8、Version 属性

描述：返回 Windows 脚本宿主的版本。
语法：object.Version
参数：object ，WScript 对象
例子：显示本机脚本宿主版本
MsgBox WScript.version

三、方法

1、CreateObject方法

描述：创建一个对象
语法：CreateObject(appname.objecttype,[servername])
解释：appname 必需的，Variant（字符串）。提供该对象的应用程序名。
        objecttype 必需的；Variant（字符串）。待创建对象的类型或类。
        servername 可选的； Variant (String). 要在其上创建对象的网络服务器名称。
说明：要创建 ActiveX 对象，只需将 CreateObject 返回的对象赋给一个对象变量：
   Set ExcelSheet = CreateObject("Excel.Sheet")'的引用。
每个支持自动化的应用程序都至少提供一种对象类型。

例如，一个字处理应用程序可能会提供 Application 对象，Document 对象，以及 Toolbar 对象。要创建 ActiveX 对象，只需将 CreateObject 返回的对象赋给一个对象变量：

Dim ExcelSheet As Object'声明一个对象变量来存放该对象
Set ExcelSheet = CreateObject("Excel.Sheet")
ExcelSheet.Application.Visible = True '设置 Application 对象使 Excel 可见
ExcelSheet.Cells(, ).Value = "This is column A, row 1"'在表格的第一个单元中写些文本
ExcelSheet.SaveAs "C:\ TEST.xls"'将该表格保存到 C:\test.xls 目录
ExcelSheet.Application.Quit'使用应用程序对象的 Quit 方法关闭 Excel。
Set ExcelSheet = Nothing'释放该对象变量

上述代码将启动该应用程序创建该对象，在本例中就是创建一个 Microsoft Excel 电子数据表。对象创建后，就可以在代码中使用自定义的对象变量来引用该对象。在下面的示例中，可以使用对象变量 ExcelSheet 来访问新建对象的属性和方法，以及访问 Microsoft Excel 的其它对象，包括应用程序对象和单元格集合。

2、GetObject方法
描述：从文件中检索一个 Automation 对象， 或检索strProgID 参数所指定的对象
语法：object.GetObject(strPathname [,strProgID], [strPrefix])
参数：object必选项。WScript 对象。
        strPathname必选项。包含要获取的对象的完整路径和名称。
        strProgID可选项。表示对象的程序标识符(ProgID)的字符串。
        strPrefix可选项。如果指定了参数 strPrefix，Windows 脚本宿 主将在创建对象之后把对象的输出接口与脚本文件连接起来。在对象中触发事件时，Windows 脚本宿主将调用一个子例程，其名称包括 strPrefix 和事件的名称。

例如，如果 strPrefix 为 "MYOBJ_"，对象产生的事件为 "OnBegin,"，那么 Windows 脚本宿主将调用脚本中的 "MYOBJ_OnBegin" 子例程。

说明：如果当前存在对象的实例或者希望使用已经被装载的文件创建对象，可使用 GetObject 方法。如果当前不存在实例，而且不希望从已经装载的文件中启动对象，请使用 CreateObject 方法。

如果一个对象将自己注册为单实例对象（例如，Microsoft Word 7.0 中的 Word.Basic 对象），那么无论执行 CreateObject 多少次也只能创建对象的一个实例。此外，对于单实例的对象，如果用零长度的字符串语法("")调用，GetObject 总是返回同样的实例，而且如果省略路径参数将导致错误。使用 GetObject 不能获得对 Visual Basic 4.0 以及以前版本创建的 Microsoft Visual Basic(R)类的引用。

GetObject 适用于所有的 COM 类，不受创建对象所用语言的限制。

示例:在执行下列代码时，与指定的 strPathname 相关联的应用程序被启动，指定文件中的对象被激活。 如果 strPathname 是一个零长度的字符串 ("")， GetObject 将返回指定类型的新对象实例。如果 strPathname 参数完全被省略，GetObject 将返回指定类型的当前活动对象。如果不存在指定类型的对象，将发生错误。

Dim MyObject As Object
Set MyObject = GetObject("C:\CAD\SCHEMA.CAD")
MyApp = MyObject.Application

某些应用程序允许激活一个文件的某些部分。如果要这样做，需要在文件名后添加一个惊叹号 (!)，然后跟一个字符串，标识出文件中希望被激活的部分。关于如何创建该字符串的信息，请参阅创建对象的应用程序的有关文档。

例如，在一个绘图应用程序中，文件中存储的一幅图可能包含多层。可以使用下面的代码激活绘图文件中称为 schema.cad 的一层：

Set LayerObject = GetObject("C:\CAD\SCHEMA.CAD!Layer3")

如果不指定对象的类，COM 将根据所提供的文件名来确定要启动的应用程序和要激活的对象。但是，某些文件可能支持多个对象类。例如，一幅图纸可能支持三种不同类型的对象：一个应用程序对象，一个绘图对象，以及一个工具栏对象，它们都是同一个文件的组成部分。

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

Dim MyObject As Object
Set MyObject = GetObject("C:\DRAWINGS\SAMPLE.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()
Set apprun = CreateObject("wscript.shell")
apprun.run "%windir%\notepad.exe"

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

5、timeout 方法

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

wscript.timeout =
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 子例程。

Set MyObject = WScript.CreateObject("SomeObject")
MyObject.SomeMethod
WScript.ConnectObject MyObject, "MyEvent"
Sub MyEvent_Event(strName)
   WScript.Echo strName
End Sub
WScript.DisconnectObject MyObject

8、DisconnectObject 方法

描述：将原先与 Windows 脚本宿主连接的对象断开。
语法：object.DisconnectObject obj
参数：object必选项。WScript 对象。
   obj要断开连接的对象的名称。
说明：
如果所指定的对象尚未被连接到 Windows 脚本宿主，则此方法不起任何作用。
例子：
下例创建了一个假想的对象并将其连接到脚本文件。然后脚本调用对象的 "SomeMethod" 方法。如果对象中发生名为 "Event" 的错误，MyEvent_Event 子例程将被调用。

Set MyObject = WScript.CreateObject("SomeObject", "MyEvent")
MyObject.SomeMethod
Sub MyEvent_Event(strName)
   WScript.Echo strName
End Sub
WScript.DisconnectObject MyObject