51Testing软件测试论坛

标题: 如何将检查点的信息输出到txt文件 [打印本页]

作者: duanwei_cn1 时间: 2006-9-7 09:57
标题: 如何将检查点的信息输出到txt文件
我是刚刚学qtp的，想将检查点的信息输出到txt文件，怎么弄啊

作者: xiaonan 时间: 2006-9-7 10:03
检查点的信息?你输出什么啊?能否说的清楚点?

作者: yuandjing 时间: 2006-9-9 09:56
先把检查点用F7实现语句，记得应该用GetRoProperty方法，把它赋值给一个变量，比如说变量是temp

然后Open "testlog.txt" For Input As #1 ‘打开记录文件
　 Print #1，temp
　　Print #1,Now '记录测试开始日期和时间
Close #1 ‘关闭记录文件

就可以了

作者: yangkinki 时间: 2006-9-9 12:43
如果是检查点的运行结果保存到txt文件，那好办

Dim fso , Tfile
Set fso=createobject("scripting.filesystemobject")
set Tfile= fso.createtextfile("d:\test.txt",true)
With Dialog("Login")
.WinEdit("Agent Name:").Set "3123432"
.WinButton("OK").Click
val=Dialog("Login").Dialog("Flight Reservations").Check (CheckPoint("Flight Reservations"))
.Dialog("Flight Reservations").WinButton("确定").Click
.WinButton("Cancel").Click
End With
Tfile.writeline "信息为： "& val
Tfile.close
Set fso=nothing

复制代码

如果是其他属性的取值保存，那就不要用检查点这种方法，用getroproperty

[ 本帖最后由 yangkinki 于 2006-9-9 12:44 编辑 ]

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