不要追求绝对的公平，红尘之中没有公平而言，人活一世，难得糊涂。 　　　　　　　　　　　　　　　　　　　　　 　　　　　　　　　　　　　　　　　　　　it is no use doing what you like, you have got to like what you do.

SQALogMessage

上一篇 / 下一篇  2007-02-05 16:02:56 / 个人分类：Robot技术

查看( 633 ) / 评论( 0 ) / 评分( 0 / 0 )
SQALogMessage Utility Command
i+v Z$Ew$Y&A0
         SQALogMessage code%, message$, descrīption$51Testing软件测试网)e'WT\r)F W.r!k
51Testing软件测试网QC$R#gT#B
例子：SQALogMessage sqaPass, "Fixed button float!", "Defect resolved"
code%   ----让你在TM LOG结果栏插入一个结果标记

        sqaPass or True----Inserts Pass in the Result column.
        sqaFail or False---Inserts Fail in the Result column.
        sqaWarning---------Inserts Warning in the Result column.
        sqaNone------------Leaves the Result column blank for the message entry.
(v9zOQT;_ Z? ne0
g6`W8?}/fH0message$   ------The message to insert in the log. The message appears
                 in the Event Type column of the log.51Testing软件测试网WwXh7Cl r6aRn
51Testing软件测试网J{,BU5~,^D4Pw
descrīption$ ------- A descrīption of the log message. The descrīption
                      appears in the Failure Descrīption field of the Log Event �
                      Log Message dialog box.51Testing软件测试网H(o,I3~*Q
Sub Main
Dim Result As Integer
Dim Value As Variant
SQALogMessage sqaNone, "Starting test of Acme Application...", ""
Window SetContext, "Caption=Acme Inc.", ""
Result = SQAGetProperty ("Type=PushButton;Text=OK", "Enabled", Value)
If Result = sqaSuccess Then
If Value = TRUE Then
Result = sqaPass
Else
Result = sqaFail
End If
SQALogMessage Result, "Test to see if OK button is enabled", ""
Else
SQALogMessage sqaWarning, "Unable to perform OK button test", "Error" + Str$(Result) + ": " + Error$(Result)
End If
End Sub
X,d;z"M"s D#glIP]0

收藏 举报

TAG: Robot技术

 

评分：0

我来说两句

Open Toolbar