求助 QTP脚本问题

taker2001

我的脚本中有一个检查点，我想实现的是检查点不通过报告错误：

1. 
   
2. Browser("登陆").Page("添加管理员_2").Check CheckPoint("添加成功")
   
3. dim a
   
4. a = Browser("登陆").Page("添加管理员_2").Check CheckPoint("添加成功")
   
5. If a=true Then
   
6.                 Reporter.ReportEvent micPass, "通过", "测试通过"
   
7. End If
   

复制代码

QTP说我a = Browser("登陆").Page("添加管理员_2").Check CheckPoint("添加成功")这句有错，请问怎么改才能实现检查点不通过就报告错误？

海龙

1. 
   
2. If Browser("登陆").Page("添加管理员_2").Check(CheckPoint("添加成功"))=true Then
   
3.           Reporter.ReportEvent micPass, "通过", "测试通过"
   
4. End If
   

复制代码