51Testing软件测试论坛

标题: 如何通过InternetExplorer.application这个对象给IE设置标题 [打印本页]

作者: namelcx 时间: 2008-11-3 20:22
标题: 如何通过InternetExplorer.application这个对象给IE设置标题
我是通过 set objExplorer = CreateObject("InternetExplorer.application")
这个办法来打开一个新的窗口，我想设置他的标题，这样后面的Borwser()方法才能找到该IE窗口
但是我试了 objExplorer.title和objExplorer.head 都不行
QTP的帮助里面也没找到相关的内容，希望熟悉这个对象属性和法方的朋友赐教一下

[ 本帖最后由 namelcx 于 2008-11-3 20:28 编辑 ]

作者: bagwell333 时间: 2008-11-4 09:24
'在document中写内容。title属性恐怕不能写吧。
Dim IE
Set IE = CreateObject("InternetExplorer.Application")
With IE
.left=200
.top=200
.height=500
.width=950
.menubar=1
.toolbar=1
.statusBar=1
.navigate "About:Blank"
.visible=1
End With
'wait a while until IE as finished to load
Do while IE.busy
loop
With IE.document
.Open
.WriteLn "<HTML><HEAD>"
.WriteLn "<TITLE>HELLO!</TITLE></HEAD>"
.WriteLn "<BODY>"
.WriteLn "<b>VBScript says </b> Hello world"
.WriteLn "</BODY>"
.WriteLn "</HTML>"
.Close
End With
Set IE = Nothing

作者: namelcx 时间: 2008-11-4 09:33
感谢楼上提供思路，多谢了

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)