51Testing软件测试论坛

标题: QTP校验点脚本(自己编写的非是录制的) [打印本页]

作者: xxxxwjj 时间: 2007-7-10 21:56
标题: QTP校验点脚本(自己编写的非是录制的)
这是我以前用QTP最毕业设计时的校验点的脚本，供大家研究研究
If browser("  对象  ").Dialog("Microsoft Internet Explorer").Exist(1)  Then
Call WriteLogMsg("fail"+","+Environment("TestName")+"--"+"查找用户失败"+"," +"wjj登陆")
browser(" 对象 ").Dialog("Microsoft Internet Explorer").WinButton("确定").Click
else
   If browser(" 对象 ").Page(" 对象    ").Frame("Disp_3").WbfUltraGrid("UlUserGrid").ColumnCount then
         Call WriteLogMsg("Success"+","+Environment("TestName")+"--"+"查找用户成功"+"," +"wjj登陆")
  else
      Call WriteLogMsg("Fail"+","+Environment("TestName")+"--"+"查找用户失败"+"," +"wjj登陆")
  end  if
End If

这是自己抓对象写的校验，他是用日志形式输出的，能明确的告诉我们，脚本的对错

写脚本经验
对于B/S结构
1。跑不过的脚本不一定错的，特别是刷新特多的模块，加个延时，也许就能通过（wait(2-时间)）！
2。抓不到对象也许是盗版的问题！

为了那个50个贴字，我可费心了！
谢谢大家来看！

[ 本帖最后由 xxxxwjj 于 2007-7-10 22:27 编辑 ]

作者: v_v 时间: 2007-7-10 23:52
看了有收益.只是LZ不急嘛...你才刚刚开学还早呢呵呵

作者: MarsNoNo 时间: 2007-7-11 14:22
脚本不全，看了基本上没什么收获~~
不过有个地方感兴趣，vbs的if嵌套，收下了，谢谢~~~
去试试if嵌套的用法。

作者: 肚子 时间: 2007-7-11 14:24
楼主同学……
来日方长
表为了50个贴子这么急sdlkfj5

作者: xxxxwjj 时间: 2007-7-11 20:18
标题: 顶到顶
顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶

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