51Testing软件测试论坛

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

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 1997|回复: 2
打印 上一主题 下一主题

[原创] 关于checkbox 的一些做法

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2008-9-26 11:36:59 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
我的思路随机点击checkbox按钮,这只是单选的操作,高人解决一些,回头在研究多选的啊,呵呵
Dim desc,descNum,getDescNum,id,checkNum
Set desc=Description.Create()
desc("type").value="checkbox"
desc("html tag").value="INPUT"
Set descNum=Browser("Browser").Page("age").ChildObjects(desc)
getDescNum=descNum.count(可获得数字18)
Randomize
num=RandomNumber (0,getdescnum)
msgbox num
set checkNum=Browser("Browser").Page("age").WebCheckBox(QG1_+num)(这句应该怎么写?)
If checkNum("checked").value="1"  Then (判断按钮checked是否为1,1说明被点击)
        reporter.ReportEvent 1,"fail","nocheck"
        else
        reporter.ReportEvent 2,"pass","check"
End If
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

该用户从未签到

2#
发表于 2008-9-26 11:57:46 | 只看该作者
RandomNumber
这个产生的随机谁重复性比较高~~~
建议使用变成的方法产生随机数~~
funcation rand(k,n)
   n=int((k-1)*rnd+1)
   rand=n
end funcation
这个产生的重复性较低
回复 支持 反对

使用道具 举报

该用户从未签到

3#
 楼主| 发表于 2008-9-27 12:12:31 | 只看该作者

谢谢各位的关注啊

我这个问题自己找到答案了
随机checkbox按钮测试
代码
Dim desc,descNum,getDescNum,id,checkNum
Set desc=Description.Create()
desc("type").value="checkbox"
desc("html tag").value="INPUT"
Set descNum=Browser("Browser").Page("age").ChildObjects(desc)
getDescNum=descNum.count'(可获得数字18)
Randomize
num=RandomNumber (0,getdescnum)
msgbox num
descNum(num).set  "ON"
'Browser("Browser").Page("age").WebCheckBox("QG1_+num").Set "ON"
If desc("checked").value="1" Then
         reporter.ReportEvent 2,"pass","check"
         else
          reporter.ReportEvent 2,"pass","check"
End If
如果有什么想法和意见,欢迎大家给些指点啊。
回复 支持 反对

使用道具 举报

本版积分规则

关闭

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

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

GMT+8, 2024-11-14 03:32 , Processed in 0.078947 second(s), 27 queries .

Powered by Discuz! X3.2

© 2001-2024 Comsenz Inc.

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