51Testing软件测试论坛

 找回密码
 (注-册)加入51Testing

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 1977|回复: 10
打印 上一主题 下一主题

[原创] QTP中的Webelement对象输入问题

[复制链接]
  • TA的每日心情

    2017-12-27 14:08
  • 签到天数: 4 天

    连续签到: 1 天

    [LV.2]测试排长

    跳转到指定楼层
    1#
    发表于 2016-11-3 11:19:59 | 只看该作者 回帖奖励 |正序浏览 |阅读模式
    本帖最后由 jialingling7777 于 2016-11-3 11:26 编辑

    file:///C:/Users/A/Desktop/性别.png

    怎么任意选择一个性别啊???
    整体是webelement属性,每种性别前的单选按钮是image属性,怎么做到随机选择一个性别并点击选中啊
    Browser("问学学校管理平台").Page("问学学校管理平台_2").Image("check-unselect.png.pagespeed.c").Click   '这个是录制时候的代码,但是不满足随机选择的效果

    本帖子中包含更多资源

    您需要 登录 才可以下载或查看,没有帐号?(注-册)加入51Testing

    x
    分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
    收藏收藏
    回复

    使用道具 举报

  • TA的每日心情

    2017-12-27 14:08
  • 签到天数: 4 天

    连续签到: 1 天

    [LV.2]测试排长

    11#
     楼主| 发表于 2016-11-11 10:08:11 | 只看该作者
    慧yl@=@ 发表于 2016-11-10 18:13
    看你这个图里的“未知”性别序号应该是2

    随机参数硬设定为2,还是选不到“未知”性别
    回复 支持 反对

    使用道具 举报

  • TA的每日心情
    慵懒
    2016-11-11 14:14
  • 签到天数: 3 天

    连续签到: 1 天

    [LV.2]测试排长

    10#
    发表于 2016-11-10 18:13:29 | 只看该作者
    jialingling7777 发表于 2016-11-9 15:19
    Dim NumberOfsexwebelement
    Dim counter1
    Dim objnum

    看你这个图里的“未知”性别序号应该是2
    回复 支持 反对

    使用道具 举报

  • TA的每日心情

    2017-12-27 14:08
  • 签到天数: 4 天

    连续签到: 1 天

    [LV.2]测试排长

    9#
     楼主| 发表于 2016-11-9 15:19:29 | 只看该作者
    慧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,但是怎么都选不到对应的“未知”性别
    回复 支持 反对

    使用道具 举报

  • TA的每日心情
    慵懒
    2016-11-11 14:14
  • 签到天数: 3 天

    连续签到: 1 天

    [LV.2]测试排长

    8#
    发表于 2016-11-8 10:38:14 | 只看该作者
    修改一下对象的属性或者设置序号标识,试一下,我之前选择列表中的某一行数据,就是这样设置的!
    回复 支持 反对

    使用道具 举报

  • TA的每日心情

    2017-12-27 14:08
  • 签到天数: 4 天

    连续签到: 1 天

    [LV.2]测试排长

    6#
     楼主| 发表于 2016-11-4 14:54:49 | 只看该作者
    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

    求大神指导啊
    回复 支持 反对

    使用道具 举报

  • TA的每日心情
    奋斗
    2 小时前
  • 签到天数: 2818 天

    连续签到: 6 天

    [LV.Master]测试大本营

    5#
    发表于 2016-11-4 13:45:53 | 只看该作者
    自己把这三个点击都录制下来,之后写个代码,随机选择一个点击
    回复 支持 反对

    使用道具 举报

  • TA的每日心情

    2024-7-8 09:00
  • 签到天数: 943 天

    连续签到: 1 天

    [LV.10]测试总司令

    4#
    发表于 2016-11-3 16:15:46 | 只看该作者
    62358366
    45348763
    191711214
    42020430
    224032440
    回复 支持 反对

    使用道具 举报

  • TA的每日心情

    2017-12-27 14:08
  • 签到天数: 4 天

    连续签到: 1 天

    [LV.2]测试排长

    3#
     楼主| 发表于 2016-11-3 15:42:10 | 只看该作者
    梦想家 发表于 2016-11-3 15:37
    折哦一个qtp群问一下吧 那样比较快这个的话 网友们不是随时都能收到消息

    什么群,给个啊
    回复 支持 反对

    使用道具 举报

  • TA的每日心情

    2024-7-8 09:00
  • 签到天数: 943 天

    连续签到: 1 天

    [LV.10]测试总司令

    2#
    发表于 2016-11-3 15:37:14 | 只看该作者
    折哦一个qtp群问一下吧 那样比较快这个的话 网友们不是随时都能收到消息
    回复 支持 反对

    使用道具 举报

    本版积分规则

    关闭

    站长推荐上一条 /1 下一条

    小黑屋|手机版|Archiver|51Testing软件测试网 ( 沪ICP备05003035号 关于我们

    GMT+8, 2024-11-23 10:01 , Processed in 0.074073 second(s), 26 queries .

    Powered by Discuz! X3.2

    © 2001-2024 Comsenz Inc.

    快速回复 返回顶部 返回列表