51Testing软件测试论坛

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

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 3241|回复: 8
打印 上一主题 下一主题

[原创] QTP 循环打开IE

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2008-5-12 15:09:07 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
各位,想请教一下
Dim Iterator
For Iterator = 1 To 10 Step 1




Browser("IT人才的理理想与现实调研问卷").Page("IT人才的理理想与现实调研问卷").WebList("A1").Select "上海"
Browser("IT人才的理理想与现实调研问卷").Page("IT人才的理理想与现实调研问卷").WebList("A3").Select "1930"
Browser("IT人才的理理想与现实调研问卷").Page("IT人才的理理想与现实调研问卷").WebList("A4").Select "无"
Browser("IT人才的理理想与现实调研问卷").Page("IT人才的理理想与现实调研问卷").WebList("A5").Select "50人以下"
Browser("IT人才的理理想与现实调研问卷").Page("IT人才的理理想与现实调研问卷").WebList("A6").Select "1年以下"
Browser("IT人才的理理想与现实调研问卷").Page("IT人才的理理想与现实调研问卷").WebList("A7").Select "管理类"
Browser("IT人才的理理想与现实调研问卷").Page("IT人才的理理想与现实调研问卷").WebList("B1").Select "半小时以内"
Browser("IT人才的理理想与现实调研问卷").Page("IT人才的理理想与现实调研问卷").WebList("B2A").Select "步行"
Browser("IT人才的理理想与现实调研问卷").Page("IT人才的理理想与现实调研问卷").WebList("B3").Select "2000元以下"
Browser("IT人才的理理想与现实调研问卷").Page("IT人才的理理想与现实调研问卷").WebList("B4").Select "很大"
Browser("IT人才的理理想与现实调研问卷").Page("IT人才的理理想与现实调研问卷").WebList("B5").Select "没有跳过槽"
Browser("IT人才的理理想与现实调研问卷").Page("IT人才的理理想与现实调研问卷").WebRadioGroup("B7").Select "1"
Browser("IT人才的理理想与现实调研问卷").Page("IT人才的理理想与现实调研问卷").WebList("B8").Select "很认同"
Browser("IT人才的理理想与现实调研问卷").Page("IT人才的理理想与现实调研问卷").WebList("B9").Select "很融洽"
Browser("IT人才的理理想与现实调研问卷").Page("IT人才的理理想与现实调研问卷").WebList("B10").Select "专制型"
Browser("IT人才的理理想与现实调研问卷").Page("IT人才的理理想与现实调研问卷").WebList("B11").Select "很融洽"
Browser("IT人才的理理想与现实调研问卷").Page("IT人才的理理想与现实调研问卷").WebList("B12").Select "没有"
Browser("IT人才的理理想与现实调研问卷").Page("IT人才的理理想与现实调研问卷").WebList("B13").Select "不加班"
Browser("IT人才的理理想与现实调研问卷").Page("IT人才的理理想与现实调研问卷").WebCheckBox("B14").Set "ON"
Browser("IT人才的理理想与现实调研问卷").Page("IT人才的理理想与现实调研问卷").WebRadioGroup("B15").Select "1"
Browser("IT人才的理理想与现实调研问卷").Page("IT人才的理理想与现实调研问卷").WebCheckBox("B16").Set "ON"
Browser("IT人才的理理想与现实调研问卷").Page("IT人才的理理想与现实调研问卷").WebList("B17").Select "会快速发展"
Browser("IT人才的理理想与现实调研问卷").Page("IT人才的理理想与现实调研问卷").WebList("C1").Select "自购房"
Browser("IT人才的理理想与现实调研问卷").Page("IT人才的理理想与现实调研问卷").WebList("C2").Select "已经购买"
Browser("IT人才的理理想与现实调研问卷").Page("IT人才的理理想与现实调研问卷").WebList("C3").Select "60平米以下"
Browser("IT人才的理理想与现实调研问卷").Page("IT人才的理理想与现实调研问卷").WebList("C4").Select "已经购买"
Browser("IT人才的理理想与现实调研问卷").Page("IT人才的理理想与现实调研问卷").WebList("C5").Select "5万以内"
Browser("IT人才的理理想与现实调研问卷").Page("IT人才的理理想与现实调研问卷").WebCheckBox("C6").Set "ON"
Browser("IT人才的理理想与现实调研问卷").Page("IT人才的理理想与现实调研问卷").WebList("D1").Select "单身,尚没有恋爱对象"
Browser("IT人才的理理想与现实调研问卷").Page("IT人才的理理想与现实调研问卷").WebRadioGroup("D2").Select "1"
Browser("IT人才的理理想与现实调研问卷").Page("IT人才的理理想与现实调研问卷").WebCheckBox("D3").Set "ON"
Browser("IT人才的理理想与现实调研问卷").Page("IT人才的理理想与现实调研问卷").WebCheckBox("D4").Set "ON"
Browser("IT人才的理理想与现实调研问卷").Page("IT人才的理理想与现实调研问卷").WebList("D5").Select "很多"
Browser("IT人才的理理想与现实调研问卷").Page("IT人才的理理想与现实调研问卷").WebButton("提交").Click
Browser("104人力银行,不止找工作,为您找方向").Page("104人力银行,不止找工作,为您找方向").Sync
Browser("104人力银行,不止找工作,为您找方向").Close
Browser("IT人才的理理想与现实调研问卷").Page("IT人才的理理想与现实调研问卷").Sync
Browser("IT人才的理理想与现实调研问卷").Close

Next
以上这段代码,只能在第一次循环的时候运行是正常的。
到了第二次的时候就错了。因为无法再次打开IE
请教各位该如何修改
谢谢
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

该用户从未签到

2#
发表于 2008-5-12 15:33:55 | 只看该作者
必须在循环体里增加一句打开对应网页的浏览器语句
回复 支持 反对

使用道具 举报

该用户从未签到

3#
发表于 2008-5-12 15:40:49 | 只看该作者

回复 1# 的帖子

请问一下,怎能么加入循环体语句.
回复 支持 反对

使用道具 举报

该用户从未签到

4#
发表于 2008-5-12 15:45:56 | 只看该作者
在循环里加一句,自动打开IE
SystemUtil.Run "C:\Program Files\Internet Explorer\IEXPLORE.EXE","对应测试网址"
回复 支持 反对

使用道具 举报

该用户从未签到

5#
发表于 2008-5-12 16:01:34 | 只看该作者

回复 1# 的帖子

那在那里啊,能不能, 按上面的例了,写一下啊
回复 支持 反对

使用道具 举报

该用户从未签到

6#
发表于 2008-5-12 16:08:43 | 只看该作者
不明白LZ的需求,为什么要循环10次,呵呵
回复 支持 反对

使用道具 举报

该用户从未签到

7#
发表于 2008-5-12 16:13:09 | 只看该作者
录制的时候不要选择设置好的web页面开始录制,就会把打开浏览器这个步骤也录制下来了. 楼上的,你可以自己去试一下,大家都讲到这份上了,你怎么还在要求别人写一下,都写好了,你自己拿来试一下,就没意思了
回复 支持 反对

使用道具 举报

该用户从未签到

8#
发表于 2008-5-13 18:00:24 | 只看该作者
加一条语句就可以了呀
systemutil.run
回复 支持 反对

使用道具 举报

该用户从未签到

9#
发表于 2008-5-14 15:59:47 | 只看该作者
做好初始化就可以避免了嘛
判断窗口是否存在,不存在则调用
systemutil.run"iexplore.exe""http://地址"
打开窗口
run setting 里不要再设置打开网页,不然会打开2个的
回复 支持 反对

使用道具 举报

本版积分规则

关闭

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

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

GMT+8, 2024-11-9 04:50 , Processed in 0.079201 second(s), 27 queries .

Powered by Discuz! X3.2

© 2001-2024 Comsenz Inc.

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