如何把结果数据记录到最后的report上

colume

我作了个脚本,可是只能通过msgbox来打印出结果,我才能知道,但这种方法不好之处就在于每次我都要看着它运行,当弹出一个消息框后,我到是可以看到输出的结果,可是我不能作别的事了,只能看着它运行,这种就不叫自动化了,我要达到的目的是,不用msgbox函数,最好能使用到每次脚本运行完成后产生的那个report报告,在最后的报告中产生我需要的值.
比如:我在用数据池后,在运行完成我的数据记录后,在最后需要关闭数据池
dpresult=SQADatapoolClose(dppwd&)
而关闭数据池后变量返回信息参照如下值
'sqaDpSuccess        0
'SQADpUninitialized  -1
'sqaDpFailure        -2
'sqaDpExtendedError  -999
我想不通过msgbox dpresult 来打印值,原来的操作是通过打印值来得知我的数据池是否被关闭
现在我想通过不打印的方式,直接在最后的report中把值显示出来,应该如果操作,请执教.最好举个例子,不胜感激!sdlkfj7

colume

在次谢谢各位的帮助

ilovejolly

在帮助里会告诉你详细的用法

nmgpy

SQALogMessage writes an entry in the Event Type column of the TestManager log. You can use this command to report the success or failure of an event, or to display any informational text you choose.

In addition to the information in the Event Type column, you can insert the notation Pass, Fail, or Warning in the Result column. If you insert Fail, the log reports Fail for the entire script.
You can also include a description of the event or informational text you display. The description appears in the Failure Description field of the Log Event – Log Message dialog box.
Here is an example of an SQALogMessage command. To see an illustration of how each argument is displayed, click the argument:

SQALogMessage sqaPass, "Fixed button float!", "Defect resolved"

Note that the second argument appears in both the Event Type column of the log and the Additional information field of the Log Event – Log Message dialog box.

colume

上面的版主,谢谢,关键是如何写log.可否教一下

ilovejolly

自己写log不就完了

qqwc

Sub Main
Dim myString as String
Dim sFilename as String
myString = "ABCDEFGHIJ0123456789"
sFilename = "C:\Temp0001.txt"
Open sFilename For Output As #1
Print #1, myString
Close #1
End Sub
这个是帮助里的例子，看看对你有没有帮助。
打开一个文件，把结果Print到这个文件上