怎样通过语句把测试结果添加到测试报告中？

topchao

在很多情况下，QTP最后产生的测试报告不能涵盖全部的内容，比如说你自己手动添加在里面的Script很多就不会生成在测试报告中，请问用什么方法或用什么语句能把你想要的结果打入到测试报告中？

Mix

什么意思？
Reporter.ReportEvent micPass," "," "？

今天有雾

应该是使用reporter这个函数，会在测试结果中显示，具体的内容可以参考帮助文档

topchao

多谢两位提点！已经完成了。有时候知道要看帮助文档但是就是不知道从何处下手，呵呵。。。有人提点再自己研究一下就能搞定了

假装不在

你去研究下report的用法，好像有几个，是在你自己生成结果中体现出来。

kissing

d=Browser("Welcome: Mercury Tours").Page("Register: Mercury Tours_2").Check(CheckPoint("zhong chong liang"))
If (d)eqv(true) Then
        reporter.ReportEvent 0,"注册用户检查点通过","注册成功"
else
        reporter.ReportEvent 1,"注册用户检查点不通过","注册用户名不正确"
End If
我现在是这么做的。。弱弱的问一句可以吗？

Mix

To kissing

If (d)eqv(true) Then
        reporter.ReportEvent 0,"注册用户"&user,"注册成功"
else
        reporter.ReportEvent 1,"注册用户"&user,"注册用户名不正确"
end if
'最好加上一个变量（user），说明注册哪个用户成功，哪个用户不成功