QTP 循环打开IE

hellen_ma

各位，想请教一下
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
请教各位该如何修改
谢谢

bluewaves

必须在循环体里增加一句打开对应网页的浏览器语句

joan89

请问一下,怎能么加入循环体语句.

huangdxx

在循环里加一句，自动打开IE
SystemUtil.Run "C:\Program Files\Internet Explorer\IEXPLORE.EXE","对应测试网址"

joan89

那在那里啊,能不能, 按上面的例了,写一下啊

zte_boy

不明白LZ的需求，为什么要循环10次，呵呵

xiaonan

录制的时候不要选择设置好的web页面开始录制，就会把打开浏览器这个步骤也录制下来了．　楼上的，你可以自己去试一下，大家都讲到这份上了，你怎么还在要求别人写一下，都写好了，你自己拿来试一下，就没意思了

gexiangping

加一条语句就可以了呀
systemutil.run

benny0823

做好初始化就可以避免了嘛
判断窗口是否存在,不存在则调用
systemutil.run"iexplore.exe""http://地址"
打开窗口
run setting 里不要再设置打开网页,不然会打开2个的