QTP识别对象的几种方法

systemutil.Run("http://www.baidu.com/")

'1描述性编程

'Browser("百度一下，你就知道").Page("百度一下，你就知道").WebEdit("name:=wd","type:=text","html tag:=INPUT").Set "helloworld"

'2object.属性，修改运行时对象库属性的值。TO是改变不了的

'Browser("百度一下，你就知道").Page("百度一下，你就知道").WebEdit("wd").Object.name="baidu"

'msgbox Browser("百度一下，你就知道").Page("百度一下，你就知道").WebEdit("wd").GetROProperty("name")

这个好像有问题哎？？？？

'3对象自身接口

'Browser("百度一下，你就知道").Page("百度一下，你就知道").WebEdit("wd").Object.value = "helloworld"

'4DOM技术,使用object spy查看id

'Browser("百度一下，你就知道").Page("百度一下，你就知道").Object.getElementById("kw").value="helloworld"

'Browser("百度一下，你就知道").Page("百度一下，你就知道").Object.getElementById("su").click

'5childobject结合描述性编程循环遍历获取对象

使用此方法我们就可以通过遍历页面上所有同类型的对象并对其进行操作。

'描述对象  

Set Desc = Description.Create()  

oDesc("micclass").Value = "WebEdit" 

'获取webedit的数量  

edit_count=Browser("百度一下，你就知道").Page("百度一下，你就知道").ChildObjects(oDesc).count  

'获取子对象集合  

set editobjects=Browser("百度一下，你就知道").Page("百度一下，你就知道").ChildObjects(oDesc)  

For i=0 to edit_count-1  

    If editobjects(i).GetROProperty("name")="wd" then  

        editobjects(i).set "helloworld" 

    End If 

Next 

Browser("百度一下，你就知道").Page("百度一下，你就知道").WebButton("百度一下").Click