关于if 语句出错

wawa133

在运行这段脚本的时候,到 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 编辑 ]

denisye

把If Browser("***)Page("***").Link("全部").Exist Then改为
If Browser("***)Page("***").Link("全部").Exist(1) Then

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

wawa133

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

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


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

yanfei5500

楼上提问的朋友，在else后面的reporter应该写“1”
else
    reporter.ReportEvent 1,"提示信息:","检索不到任何的数据"

echo1122

搂主，你运行 IF else 语句，慢吗？为什么我的特别慢呢？运行通过了，就是慢。

wawa133

呵呵.不好意思啊.是我自己搞错了RUN的地方,所以就出错了.谢谢楼上的回答呢.

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

xp20683

If Browser("**").Page("***").Link("全部").Exist Then
     Browser("***").Page("***").Link("全部").Click
     reporter.ReportEvent 0,"提示信息:","检索到数据"
else
    reporter.ReportEvent 0,"提示信息:","检索不到任何的数据"
End If
没有错,我已经试过了

wawa133

呵呵...SORRY啊.拷贝的时候弄错了,不过在我的QTP脚本里是没有错的.

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

xp20683

Browser("***少了一半的括号
endif应写成end if