51Testing软件测试论坛

标题: if not .... then ....end if问题 [打印本页]

作者: wangyong3552128 时间: 2007-4-29 11:16
标题: if not .... then ....end if问题
wait(1)
If not Browser("首页").Page("网易").Exist Then

systemutil.Run"C:\Program Files\Internet Explorer\IEXPLORE.EXE"

Browser("首页").Page("Page").Sync
Browser("首页").Navigate "http://mail.163.com"
Browser("首页").Page("首页").Sync
.
.
.
登陆.....
end if

我把这几句代码放在了脚本的前面。
1.一开始没加wait(1),报end if 错误。加了个wait(1)问题就解决了，为什么？
2.为什么 If not Browser("首页").Page("网易").Exist Then 运行特别慢？运行指针指在这句好大一会不动。

请帮忙解决此问题。

作者: songfun 时间: 2007-4-29 11:35
第一个问题，因为这个page对象还没打开，不存在，所以报错，你想不报错，就在最开头加上 On Error Resume Next

第二个问题，你得好好查一下帮助为什么会那么慢？因为Exist这个函数默认等待时间20秒，你写为 Exist(0) 就非常快了！

原帖由 wangyong3552128 于 2007-4-29 11:16 发表
wait(1)
If not Browser("首页").Page("网易").Exist Then

systemutil.Run"C:\Program Files\Internet Explorer\IEXPLORE.EXE"

Browser("首页").Page("Page").Sync
Browser("首页").Navigate "http:/ ...

作者: wangyong3552128 时间: 2007-4-29 13:52
Exist(0)

改了以后还是有点慢哦

作者: vacation9 时间: 2007-4-29 15:23
学习

作者: songfun 时间: 2007-4-29 17:39
会慢不是因为语句的问题，你的代码里有没有sync同步点？？
要等到网页载入才行，这不是qtp的问题，是你的IE打开一个网页需要一段时间，而程序执行需要等待。

原帖由 wangyong3552128 于 2007-4-29 13:52 发表
Exist(0)

改了以后还是有点慢哦

作者: rting 时间: 2007-4-29 23:49
xuexi学习了

作者: xihong2004 时间: 2007-4-30 10:26
路过

作者: jaylan 时间: 2007-6-11 15:04
学习中...

作者: zhx383024 时间: 2007-6-11 15:33
EXIST(1),应该指的是存在的时间为1秒,其实我个人觉得在if面前加不加wait,时间都是一样的
你可以从wait(1)前开始计时,到执行then后面的语句,加了wait跟没加wait应该是一样的.

判断某个控件不存在用if not本身就会比较慢,QTP要判断一个控件是否存在,除非马上找到了匹配了控件,否则它还会继续查找,需要等待一定的时间QTP才能断定这个控件是不存在的,才会去执行then后面的语句.

我个人的理解,呵呵,如有误,望指正

作者: wangyong3552128 时间: 2007-6-19 19:02
谢谢，你的解释。

作者: zhuyuancan 时间: 2007-6-20 15:24
支持一哈哈

作者: smallmark 时间: 2007-6-22 16:50
累了，周末了，该休息了！

作者: lhjtc8257 时间: 2007-8-1 16:37

原帖由 wangyong3552128 于 2007-4-29 11:16 发表
wait(1)
If not Browser("首页").Page("网易").Exist Then

systemutil.Run"C:\Program Files\Internet Explorer\IEXPLORE.EXE"

Browser("首页").Page("Page").Sync
Browser("首页").Navigate "http:/ ...

都是时间上的问题
网页还没出来
程序需要化时间去检查网页是否存在

作者: sy070904 时间: 2009-8-18 19:24
标题: if then如何执行then后的多个语句
If Browser("Browser").Window("新增IP池 -- 网页对话框").Dialog("Microsoft Internet Explorer").WinButton("确定").Click Then
Browser("Browser").Window("新增IP池 -- 网页对话框").Dialog("Microsoft Internet Explorer").WinButton("确定").Click : Browser("Browser").Window("新增IP池 -- 网页对话框").Close
End If

作者: dabeixiong 时间: 2009-8-18 21:26
哎~学到点知识

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)