最近要过质量体系,所以就整理一下关于vbscript的资料,到时打算使用VBSCRIPT来进行文档格式化设置。更多关于vbscript的资料可以查看这里 http://www.bytekits.com/tjfw/vbscript/
WScript 对象提供对 Windows 脚本宿主对象模型根对象的访问。
WScript 对象是 Windows 脚本宿主对象模型层次结构的根对象。它可在任何脚本文件中使用,不需要特定的声明或实例化。
WScript 对象提供对以下信息的访问命令行参数, 脚本文件的名称,宿主文件名, 宿主版本信息。
WScript 对象可用来创建对象,连接对象, 与对象断开连接, 同步事件, 以编程方式停止脚本的执行,将信息输出到默认输出设备(Windows 对话框或命令控制台)。
WScript 对象也可用来设置脚本运行的模式(交互模式或批处理模式)。 就像刚才我们说的一样,对象通过两种其自有的特性想我们提供工具,这两种特性分别是“属性”和“方法”。
msgBox WScript.ScriptFullName
WScript对象属性
WScript 对象提供对以下信息的访问:
属性返回值类型说明ApplicationObject返回 IHost_Class 对象(Wscript 对象)。ArgumentsIArguments_Class返回 WshArguments 对象(参数集)。BuildVersionLong返回 Windows 脚本宿主的内部版本。FullNameString返回宿主可执行文件(CScript.exe 或 WScript.exe)的全路径。InteractiveBoolean设置或确定脚本模式。NameStringWScript 对象(宿主可执行文件)的名称。PathString返回包含宿主可执行文件(CScript.exe 或 WScript.exe)的路径名称。ScriptFullNameString返回当前运行脚本的完整路径。ScriptNameString返回当前运行脚本的文件名。StdErrTextStream显示当前脚本的错误输出流。StdInTextStream显示当前脚本的输入流。StdOutTextStream显示当前脚本的输出流。TimeoutLong超时设定秒:允许脚本运行的最长时间。VersionString返回 Windows 脚本宿主的版本。
WSCript属性说明
1、Arguments 属性
描述:用于返回 Arguments 对象(这个对象我们以后会学,现在只需要了解就行)。
语法:object.Arguments
参数:object ,WScript 对象
例子:显示本vbs文件运行的参数
Set Arg = WScript.ArgumentsFor 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:WINDOWSsystem32wscript.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
WSCript属性代码示例
如我们建一个WScript.vbs存到电脑桌面:
BuildVersion = "WScript.BuildVersion:"+CStr(WScript.BuildVersion)+chr(10)FullName = "WScript.FullName:"+WScript.FullName+chr(10) Interactive = "WScript.Interactive:"+CStr(WScript.Interactive)+chr(10)Name = "WScript.Name:"+CStr(WScript.Name)+chr(10) Path = "WScript.Path:"+WScript.Path+chr(10) ScriptFullName = "WScript.ScriptFullName:"+WScript.ScriptFullName+chr(10)ScriptName = "WScript.ScriptName:"+WScript.ScriptName+chr(10)Version = "WScript.Version:"+WScript.Version+chr(10)Timeout = "WScript.Timeout:"+CStr(WScript.Timeout)+chr(10)Arguments=""For I = 0 to WScript.Arguments.Count - 1Arguments = Arguments + "Arguments"+CStr(I)+":"+WScript.Arguments(I)+chr(10)NextMsgBox BuildVersion+FullName+Interactive+Name+ScriptFullName+ScriptName+Version+Timeout+Arguments
![048f6ed6a297f41f2e042a122954d6a5.png](https://i-blog.csdnimg.cn/blog_migrate/a868fb7b8778081d27654bfd79715f56.jpeg)
WScript方法
1、CreateObject方法
描述:创建一个对象
语法:CreateObject(appname.objecttype,[servername])
解释:
- appname 必需的,Variant(字符串)。提供该对象的应用程序名。
- objecttype 必需的;Variant(字符串)。待创建对象的类型或类。
- servername 可选的; Variant (String). 要在其上创建对象的网络服务器名称。
说明:要创建 ActiveX 对象,只需将 CreateObject 返回的对象赋给一个对象变量:
Set ExcelSheet = CreateObject("Excel.Application")
每个支持自动化的应用程序都至少提供一种对象类型。
例如,一个字处理应用程序可能会提供 Application 对象,Document 对象,以及 Toolbar 对象。
要创建 ActiveX 对象,只需将 CreateObject 返回的对象赋给一个对象变量:
Set ExcelSheet = WsCRipt.CreateObject("Excel.Application") ExcelSheet.Application.Visible = True '设置 Application 对象使 Excel 可见 ExcelSheet.workBooks.add ExcelSheet.Cells(1,1).Value = "This is column A, row 1" '在表格的第一个单元中写些文本 ExcelSheet.activeWorkBook.Saveas ("C:TEST.xls") '将该表格保存到 C:est.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 ObjectSet MyObject = GetObject("C:CADSCHEMA.CAD")MyApp = MyObject.Application
某些应用程序允许激活一个文件的某些部分。如果要这样做,需要在文件名后添加一个惊叹号 (!),然后跟一个字符串,标识出文件中希望被激活的部分。关于如何创建该字符串的信息,请参阅创建对象的应用程序的有关文档。
例如,在一个绘图应用程序中,文件中存储的一幅图可能包含多层。可以使用下面的代码激活绘图文件中称为 schema.cad 的一层:
Set LayerObject = GetObject("C:CADSCHEMA.CAD!Layer3")
如果不指定对象的类,COM 将根据所提供的文件名来确定要启动的应用程序和要激活的对象。但是,某些文件可能支持多个对象类。例如,一幅图纸可能支持三种不同类型的对象:一个应用程序对象,一个绘图对象,以及一个工具栏对象,它们都是同一个文件的组成部分。
在下例中,FIGMENT 是一个绘图应用程序的名称,DRAWING 是它支持的对象类型之一。
Dim MyObject As ObjectSet 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%otepad.exe"
此例子将会延迟3秒启动记事本。
5、timeout 方法
描述:设置脚本的生存时间
语法:wscript.timeout
例子:
wscript.timeout = 10MsgBox "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:est.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