51Testing软件测试论坛

标题: 关于if 语句出错 [打印本页]

作者: wawa133 时间: 2006-12-6 09:44
标题: 关于if 语句出错
在运行这段脚本的时候,到 else 就出错了
If Browser("***)Page("***").Link("全部").Exist Then
   Browser("***").Page("***").Link("全部").Click
   reporter.ReportEvent 0,"提示信息:","检索到数据"
else
reporter.ReportEvent 0,"提示信息:","检索不到任何的数据"
End If

出错提示:
The test run cannot continue due to a syntax error.
没有声明。

我改了了elseif也出现一样的错啊.不知道什么原因.sdlkfj8
但是我自己写了段代码.
dim a
for a=0 to 5
a=a+1
  if a=3 then
msgbox "OK"
else
msgbox "fail"
end if
next
运行这段代码的时候是不会出错的.

[ 本帖最后由 wawa133 于 2006-12-6 09:55 编辑 ]

作者: xp20683 时间: 2006-12-6 09:50
Browser("***少了一半的括号
endif应写成end if

作者: wawa133 时间: 2006-12-6 09:54
呵呵...SORRY啊.拷贝的时候弄错了,不过在我的QTP脚本里是没有错的.

但是不知道为什么这里
If Browser("***Page("***").Link("全部").Exist Then
Browser("***").Page("***").Link("全部").Click
reporter.ReportEvent 0,"提示信息:","检索到数据"
else
reporter.ReportEvent 0,"提示信息:","检索不到任何的数据"
End If
会出错啊.??/

作者: xp20683 时间: 2006-12-6 10:04
If Browser("**").Page("***").Link("全部").Exist Then
Browser("***").Page("***").Link("全部").Click
reporter.ReportEvent 0,"提示信息:","检索到数据"
else
reporter.ReportEvent 0,"提示信息:","检索不到任何的数据"
End If
没有错,我已经试过了

作者: wawa133 时间: 2006-12-6 10:11
呵呵.不好意思啊.是我自己搞错了RUN的地方,所以就出错了.谢谢楼上的回答呢.

[ 本帖最后由 wawa133 于 2006-12-6 10:17 编辑 ]

作者: echo1122 时间: 2006-12-7 21:47
搂主，你运行 IF else 语句，慢吗？为什么我的特别慢呢？运行通过了，就是慢。

作者: yanfei5500 时间: 2006-12-7 22:42
楼上提问的朋友，在else后面的reporter应该写“1”
else
reporter.ReportEvent 1,"提示信息:","检索不到任何的数据"

作者: wawa133 时间: 2006-12-8 11:30

原帖由 echo1122 于 2006-12-7 21:47 发表
搂主，你运行 IF else 语句，慢吗？为什么我的特别慢呢？运行通过了，就是慢。

嗯.我用的时候也很慢,有的时候估计要等几十秒呢不知道为什么呢

关于楼上说的reporter,这个是我自己定的,呵呵.......只是为了让自己看一下结果

作者: denisye 时间: 2006-12-8 11:39
把If Browser("***)Page("***").Link("全部").Exist Then改为
If Browser("***)Page("***").Link("全部").Exist(1) Then

这样就不会很慢了吧
(1)是timeout时间

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