mouseweiwei 发表于 2008-9-1 15:53:02

QTP识别checkbox的问题

请教,在一个页面中有一组checkbox 他们的 name属性都为 role
    现在请教 如何使用QTP去 定位我具体需要勾选的checkbox呢?
代码
Browser("XXXX").Window("XXXX").Page("修改用户角色").WebCheckBox("role").Set"ON"

红字部分就是 QTP识别的 那个checkbox 可是 checkbox的name都是一样的 如何去定位到其他的checkbox上呢?

dalinangel 发表于 2008-9-1 17:51:25

value应该不一样

blueeagle9999 发表于 2008-9-1 22:46:41

查看一下这一组checkbox有哪个属性是能够唯一被识别的, 换个属性去识别看看

fengmingbao 发表于 2008-9-2 08:54:53

Dim temp_Objec_2, dd

'Using DP to define a object collection: Checkbox
set temp_Objec_2=Description.create()
temp_Objec_2("html tag").value="INPUT"
temp_Objec_2("type").value="checkbox¡°

'Set all check boxes in an Array
set dd = Browser(¡°AA").Page(¡°bb").Frame("rightFrame_2").Childobjects(temp_Objec_2)

'Select the checkbox based the required row number
dd.item(requiredRow -2).set "ON"


你需要根据你们的需求,到底你想选哪个checkbox, 即求 requiredRow . 也可以写一循环,一次性全选上

mouseweiwei 发表于 2008-9-2 14:10:12

回1楼的 他们的value是不同的 但我找了喊多贴子 自己试了 识别不出来 请教那句代码该怎么写
那些checkbox的value是 10000 10001 10002...


回2楼的 value是不同的 那句该如何写呢

mouseweiwei 发表于 2008-9-2 14:16:13

原帖由 fengmingbao 于 2008-9-2 08:54 发表 http://bbs.51testing.com/images/common/back.gif
Dim temp_Objec_2, dd

'Using DP to define a object collection: Checkbox
set temp_Objec_2=Description.create()
temp_Objec_2("html tag").value="INPUT"
temp_Objec_2("type").value="checkbox¡°
...

这个上面的
把temp_Objec_2 定义成一个 checkbox

'Set all check boxes in an Array
set dd = Browser(?°AA").Page(?°bb").Frame("rightFrame_2").Childobjects(temp_Objec_2)
是如何生成一组checkbox的呢? 这里有点不明白

fengmingbao 发表于 2008-9-2 14:25:40

回复 6# 的帖子

你有没有试着运行一下?


Dim temp_Objec_2, dd

'Using DP to define a object collection: Checkbox
set temp_Objec_2=Description.create()
temp_Objec_2("html tag").value="INPUT"
temp_Objec_2("type").value="checkbox¡°

这几句定义了一个对象 temp_Objec_2, 其实它是一个checkbox


set dd = Browser(?°AA").Page(?°bb").Frame("rightFrame_2").Childobjects(temp_Objec_2)

这句话是找出Browser(?°AA").Page(?°bb").Frame("rightFrame_2")里面的所有checkbox

mouseweiwei 发表于 2008-9-2 15:40:03

感谢楼上的兄弟
我尝试成功了 下面只要把 10001那块用参数化写了就能自动找相应的check了

Dim checkbox1
set checkbox1 = Description.Create()

checkbox1("value").Value = "10001"
browser("XXXX").Window("XXXX").Page("XXXX").WebCheckBox(checkbox1).set"ON"
Browser("XXXX").Window("XXX").Page("XXX").WebButton("返 回").Click
页: [1]
查看完整版本: QTP识别checkbox的问题