VBS基础篇

一、wscript对象

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

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

二、属性

1、Arguments 属性

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

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

Set Arg = WScript.Arguments
For i = 0 To Arg.Count - 1
   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(1, 1).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(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 子例程。

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
(0)

相关推荐