xxxxwjj 发表于 2007-7-10 21:56:18

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登陆")
endif
End If


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

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


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

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

v_v 发表于 2007-7-10 23:52:32

看了有收益.只是LZ不急嘛...你才刚刚开学还早呢呵呵

MarsNoNo 发表于 2007-7-11 14:22:45

脚本不全，看了基本上没什么收获~~
不过有个地方感兴趣，vbs的if嵌套，收下了，谢谢~~~
去试试if嵌套的用法。

肚子 发表于 2007-7-11 14:24:25

楼主同学……
来日方长
表为了50个贴子这么急sdlkfj5

xxxxwjj 发表于 2007-7-11 20:18:49

顶到顶

顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶
页: [1]
查看完整版本: QTP校验点脚本(自己编写的非是录制的)