51Testing软件测试论坛

标题: 求助 QTP脚本问题 [打印本页]

---

作者: taker2001    时间: 2006-3-22 02:19
标题: 求助 QTP脚本问题
我的脚本中有一个检查点，我想实现的是检查点不通过报告错误：

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("添加成功")这句有错，请问怎么改才能实现检查点不通过就报告错误？

---

作者: 海龙    时间: 2006-3-22 13:09

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

复制代码

---

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

Powered by Discuz! X3.2