• <ruby id="5koa6"></ruby>
    <ruby id="5koa6"><option id="5koa6"><thead id="5koa6"></thead></option></ruby>

    <progress id="5koa6"></progress>

  • <strong id="5koa6"></strong>
  • 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.kjueaiud.com

    老湿亚洲永久精品ww47香蕉图片_日韩欧美中文字幕北美法律_国产AV永久无码天堂影院_久久婷婷综合色丁香五月

  • <ruby id="5koa6"></ruby>
    <ruby id="5koa6"><option id="5koa6"><thead id="5koa6"></thead></option></ruby>

    <progress id="5koa6"></progress>

  • <strong id="5koa6"></strong>