QTP 无法识别web 大全

说明：这里以一个登陆框为例，展示了各种方式供你选择。

假设你喜欢对象的话。也能够手动加入对象webedit。

watermark/2/text/aHR0cDovL2Jsb2cuY3Nkbi5uZXQv/font/5a6L5L2T/fontsize/400/fill/I0JBQkFCMA==/dissolve/70/gravity/Center" alt="">

依据以上信息，我们就能够玩转web对象了：



1、採用WebElement的描写叙述编程方式：

        Window("360安全浏览器 7.1").Page("好视通BOSS管理系统").WebElement("name:=name").Object.value= "test1"

 msgbox Window("360安全浏览器 7.1").Page("好视通BOSS管理系统").WebElement("name:=name").Object.value

 msgbox Window("360安全浏览器 7.1").Page("好视通BOSS管理系统").WebElement("name:=name").GetROProperty("value")



2、顺便添加2个右键操作的，左键方法类似：

Setting.WebPackage("ReplayType") = 2

  Window("360安全浏览器 7.1").Page("好视通BOSS管理系统").WebElement("name:=name").RightClick

  wait 2

  Window("360安全浏览器 7.1").Page("好视通BOSS管理系统").WebElement("name:=name").Click

  Window("360安全浏览器 7.1").Page("好视通BOSS管理系统").WebElement("name:=name").FireEvent "onclick",,,micRightBtn

  wait 2

 Setting.WebPackage("ReplayType") = 1

3、依据webElement的id：

        Window("360安全浏览器 7.1").Page("好视通BOSS管理系统").WebElement("html id:=userName").Object.value ="test2"

 msgbox Window("360安全浏览器 7.1").Page("好视通BOSS管理系统").WebElement("html id:=userName").Object.value

4、依据对象的多个属性来确定唯一对象：

          Window("360安全浏览器 7.1").Page("好视通BOSS管理系统").WebElement("class:=input_div","type:=text").Object.value ="test3"

 msgbox Window("360安全浏览器 7.1").Page("好视通BOSS管理系统").WebElement("html id:=userName").Object.value

5、採用DOM方式的getelementByid方式：

       Window("360安全浏览器 7.1").Page("好视通BOSS管理系统").Object.getelementbyid("userName").value = "test4"

msgbox Window("360安全浏览器 7.1").Page("好视通BOSS管理系统").Object.getelementbyid("userName").value



6、採用DOM方式的getelementByName方式：

'这里仅仅取对象名为name的第一个对象的值

       Window("360安全浏览器 7.1").Page("好视通BOSS管理系统").Object.getElementsByName("name").item(0).value = "test5"

msgbox Window("360安全浏览器 7.1").Page("好视通BOSS管理系统").Object.getElementsByName("name").item(0).value

       Window("360安全浏览器 7.1").Page("好视通BOSS管理系统").Object.getElementsByName("name")(0).value = "test6"

msgbox Window("360安全浏览器 7.1").Page("好视通BOSS管理系统").Object.getElementsByName("name")(0).value





'假设有多个同名的则会返回多个

Set oEdites = Window("360安全浏览器 7.1").Page("好视通BOSS管理系统").Object.getElementsByName("name")

For each oEdit in oEdites

msgbox oEdit

msgbox oEdit.value

Next