QTP自動化測試之VBScript對象(4)

發表于:2012-01-18來源:博客園作者:  known點擊數: 標簽:QTP自動化測試
4. Err對象 Err對象是一個具有全局范圍的內部對象,不必在代碼中創建它的實例,含有關于運行時錯誤的信息。主要屬性有Description、HelpContext、HelpFile、N

  4. Err對象

  Err對象是一個具有全局范圍的內部對象,不必在代碼中創建它的實例,含有關于運行時錯誤的信息。主要屬性有Description、HelpContext、HelpFile、Number、Source,主要方法有Clear、Raise,其屬性及方法的詳細說明詳見參考文檔。下面的示例說明了Err對象的用法:

  ?

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
'示例1:
On Error Resume Next
Err.Raise 6  '產生溢出錯誤
MsgBox("Error #" & CStr(Err.Number) & " " & Err.Description)
Err.Clear
 
'示例2:
'定義數據庫連接
Dim conn
Set conn = CreateObject("ADODB.Connection")
conn.BeginTrans  '開始事務
 
...
 
'提交數據庫事務錯誤處理
On Error Resume Next
If conn.Errors.Count > 0 Then
    conn.RollbackTrans  '回滾事務
Else
    conn.CommitTrans    '提交事務
End If
Err.Clear

原文轉自:http://www.anti-gravitydesign.com

国产97人人超碰caoprom_尤物国产在线一区手机播放_精品国产一区二区三_色天使久久综合给合久久97