QTP中的Webelement对象输入问题
本帖最后由 jialingling7777 于 2016-11-3 11:26 编辑file:///C:/Users/A/Desktop/性别.png
怎么任意选择一个性别啊？？？
整体是webelement属性，每种性别前的单选按钮是image属性，怎么做到随机选择一个性别并点击选中啊
Browser("问学学校管理平台").Page("问学学校管理平台_2").Image("check-unselect.png.pagespeed.c").Click '这个是录制时候的代码，但是不满足随机选择的效果
折哦一个qtp群问一下吧 那样比较快这个的话 网友们不是随时都能收到消息 梦想家 发表于 2016-11-3 15:37
折哦一个qtp群问一下吧 那样比较快这个的话 网友们不是随时都能收到消息
什么群，给个啊 62358366
45348763
191711214
42020430
224032440 自己把这三个点击都录制下来，之后写个代码，随机选择一个点击 jingzizx 发表于 2016-11-4 13:45
自己把这三个点击都录制下来，之后写个代码，随机选择一个点击
Dim NumberOfsexwebelement
Dim crand
Dim objnum
Set oDesc = Description.Create()
oDesc("micClass").Value = "Image"
oDesc("html tag").Value="IMG"
oDesc("src").Value = "http://wenxue.test.xweisoft.com/scms/resources/images/check-*"
oDesc("src").RegularExpression = True
set objnum=Browser("问学学校管理平台").Page("问学学校管理平台_2").ChildObjects(oDesc)
NumberOfsexwebelement =oDesc.Count
'msgbox NumberOfsexwebelement '调试用
crand=randomnumber(1,cint(NumberOfsexwebelement))
'msgbox crand '调试用
objnum(crand).Click
最后一行代码怎么都过不去报：general run error
求大神指导啊 :o 修改一下对象的属性或者设置序号标识，试一下，我之前选择列表中的某一行数据，就是这样设置的！ 慧yl@=@ 发表于 2016-11-8 10:38
修改一下对象的属性或者设置序号标识，试一下，我之前选择列表中的某一行数据，就是这样设置的！
Dim NumberOfsexwebelement
Dim counter1
Dim objnum
Set oDesc = Description.Create()
oDesc("micClass").Value = "Image"
oDesc("html tag").Value="IMG"
'oDesc("src").Value = "http://wenxue.test.xweisoft.com/scms/resources/images/check*"
'oDesc("src").RegularExpression = True
oDesc("image type").value="Plain Image"
set objnum=Browser("问学学校管理平台").Page("问学学校管理平台_2").WebElement("男 女 未知").ChildObjects(oDesc)
NumberOfsexwebelement =oDesc.Count
msgbox NumberOfsexwebelement '调试用找到这个类的属性个数是3
counter1=randomnumber(3,NumberOfsexwebelement)
msgbox counter1
objnum(counter1).Click
按你的说的该了，能运行部报错但是有个奇怪的问题就是随机参数硬设定为3，但是怎么都选不到对应的“未知”性别 jialingling7777 发表于 2016-11-9 15:19
Dim NumberOfsexwebelement
Dim counter1
Dim objnum
看你这个图里的“未知”性别序号应该是2 慧yl@=@ 发表于 2016-11-10 18:13
看你这个图里的“未知”性别序号应该是2
随机参数硬设定为2，还是选不到“未知”性别
页:
[1]
