VBS函数应用--getobject的使用获得Automation对象
2012-02-23 14:42
274 查看
返回对文件中 Automation 对象的引用。
在执行上述代码时,就会启动与指定路径名相关联的应用程序,同时激活指定文件中的对象。如果 pathname 是零长度字符串 (""),GetObject 返回指定类型的新对象实例。如果省略 pathname 参数,GetObject 将返回指定类型的当前活动对象。如果没有指定类型的对象,就会出现错误。
某些应用程序允许只激活文件的一部分,方法是在文件名后加上一个惊叹号 (!) 以及用于标识要激活的文件部分的字符串。有关创建这种字符串的详细信息,请参阅创建对象的应用程序的有关文档。
例如,在绘图应用程序中,一个存放在文件中的图可能有多层。可以使用下述代码来激活图 SCHEMA.CAD 中的某一层:
如果没有指定对象的类,则 Automation 会根据所提供的文件名,确定要启动的应用程序以及要激活的对象。但是,有些文件可能支持多个对象类。例如,图可能支持三种不同类型的对象:Application 对象、Drawing 对象和 Toolbar 对象,所有这些都是同一个文件中的一部分。使用可选项的 class 参数可以指定文件中要激活的对象。例如:
在上述样例中,FIGMENT 是绘图应用程序的名称,而 DRAWING 则是它支持的一种对象类型。对象被激活之后,就可以在代码中使用所定义的对象变量来引用它。在前面的例子中,可以使用对象变量 MyObject 访问新对象的属性和方法。例如:
注意 在对象的当前实例存在,或者要用已加载的文件创建对象时,请使用 GetObject 函数。如果没有当前实例,并且不准备使用已加载的文件启动对象,请使用 CreateObject 函数。
如果对象已注册为单个实例的对象,则无论执行多少次 CreateObject,都只能创建该对象的一个实例。若使用单个实例对象,当使用零长度字符串 ("") 语法调用时,GetObject 总是返回同一个实例,而如果省略 pathname 参数,则会出现错误。
复制代码代码如下:
Set oDOM = WScript.GetObject(WScript.Arguments(0))
do until oDOM.readyState = "complete"
WScript.sleep 200
loop
WScript.echo oDOM.documentElement.outerHTML
或
复制代码代码如下:
Set oDOM=WScript.GetObject("http://www.ip138.com/ip2city.asp")'就是取得这个对象
Do Until oDOM.readyState="complete" '一直循环等待200ms,直到页面加载完成
WScript.sleep 200'就是等待200ms
Loop
WScript.echo oDOM.documentElement.outerText'取得某个文本,并弹出对话框以显示此消息
Set oDOM=nothing'断开与对象的连接以释放内存。
GetObject([pathname] [, class])参数 Pathname 可选项。字符串,包含待检索对象的文件的完整路径和名称。如果省略 pathname 则必须有 class。 Class 可选项。字符串,对象的类。 class 参数的语法格式为 appname.objectype,其中包括以下部分: 参数 appname 必选项。字符串,提供对象的应用程序名称。 objectype 必选项。字符串,要创建的对象的类型或类。 说明 使用 GetObject 函数可以访问文件中的 Automation 对象,而且可以将该对象赋值给对象变量。使用 Set 语句将 GetObject 返回的对象赋值给对象变量。例如:
Dim CADObject Set CADObject = GetObject("C:\CAD\SCHEMA.CAD")
在执行上述代码时,就会启动与指定路径名相关联的应用程序,同时激活指定文件中的对象。如果 pathname 是零长度字符串 (""),GetObject 返回指定类型的新对象实例。如果省略 pathname 参数,GetObject 将返回指定类型的当前活动对象。如果没有指定类型的对象,就会出现错误。
某些应用程序允许只激活文件的一部分,方法是在文件名后加上一个惊叹号 (!) 以及用于标识要激活的文件部分的字符串。有关创建这种字符串的详细信息,请参阅创建对象的应用程序的有关文档。
例如,在绘图应用程序中,一个存放在文件中的图可能有多层。可以使用下述代码来激活图 SCHEMA.CAD 中的某一层:
Set LayerObject = GetObject("C:\CAD\SCHEMA.CAD!Layer3")
如果没有指定对象的类,则 Automation 会根据所提供的文件名,确定要启动的应用程序以及要激活的对象。但是,有些文件可能支持多个对象类。例如,图可能支持三种不同类型的对象:Application 对象、Drawing 对象和 Toolbar 对象,所有这些都是同一个文件中的一部分。使用可选项的 class 参数可以指定文件中要激活的对象。例如:
Dim MyObject Set MyObject = GetObject("C:\DRAWINGS\SAMPLE.DRW", "FIGMENT.DRAWING")
在上述样例中,FIGMENT 是绘图应用程序的名称,而 DRAWING 则是它支持的一种对象类型。对象被激活之后,就可以在代码中使用所定义的对象变量来引用它。在前面的例子中,可以使用对象变量 MyObject 访问新对象的属性和方法。例如:
MyObject.Line 9, 90 MyObject.InsertText 9, 100, "嗨,你好!
"
MyObject.SaveAs "C:\DRAWINGS\SAMPLE.DRW"
注意 在对象的当前实例存在,或者要用已加载的文件创建对象时,请使用 GetObject 函数。如果没有当前实例,并且不准备使用已加载的文件启动对象,请使用 CreateObject 函数。
如果对象已注册为单个实例的对象,则无论执行多少次 CreateObject,都只能创建该对象的一个实例。若使用单个实例对象,当使用零长度字符串 ("") 语法调用时,GetObject 总是返回同一个实例,而如果省略 pathname 参数,则会出现错误。
复制代码代码如下:
Set oDOM = WScript.GetObject(WScript.Arguments(0))
do until oDOM.readyState = "complete"
WScript.sleep 200
loop
WScript.echo oDOM.documentElement.outerHTML
或
复制代码代码如下:
Set oDOM=WScript.GetObject("http://www.ip138.com/ip2city.asp")'就是取得这个对象
Do Until oDOM.readyState="complete" '一直循环等待200ms,直到页面加载完成
WScript.sleep 200'就是等待200ms
Loop
WScript.echo oDOM.documentElement.outerText'取得某个文本,并弹出对话框以显示此消息
Set oDOM=nothing'断开与对象的连接以释放内存。
相关文章推荐
- 使用urllib的urlopen函数获得HTTP Response Headers
- 【Cocos2d-X开发学习笔记】第18期:动作类之改变动作对象、函数回调动作以及过程动作的使用
- 使用js声明数组,对象在jsp页面中(获得ajax得到json数据)
- 如何应用C++的函数对象
- 使用evel()函数将json字符串转换为json对象
- 函数对象和stl算法应用实例
- Extjs项目使用经验————获得当前正在编辑的列对象/可以用于ObjectCombo
- C++沉思录读书笔记(21,22章)- 函数对象存在的意义以及自定义能应用bind1st(bind2nd)的函数对象模板
- sql server 创建table表 及添加各种约束 查看约束 删除约束 新增表的字段 规则及规则使用方法及应用到表中 时间函数的类型
- 【Windows 10 应用开发】使用x-Bind标记动态获得计算结果
- 从零开始学C++之对象的使用(一):static 成员变量、static 成员函数、类/对象的大小
- JSP内置对象:使用getparameter方法获得数据
- 转换流的使用,和装饰类的应用,以及开发时该怎样选择要使用的对象
- Effective Java(用函数对象表示策略、优先使用静态成员类)
- 使用Visual Studio.Net,系统报告“automation服务器不能创建对象”错误。解决之道运行:regsvr32 scrrun.dll 就可以了。
- Android深入浅出系列之实例应用—弹出消息Toast对象的使用自定义方式(二)
- 使用/调用 函数的时候, 前面加不加 对象或 this?
- 函数对象应用
- [NET]Net中的反射使用入门(根据类名和函数名,生成和调用对象的成员函数)
- STL for_each 和函数对象(function object) 使用详解