軟件測試工具VBscript的err對象
Err 對象是一個具有全局范圍 —的固有對象：不必在您的代碼中創建它的示例。Err的屬性被一個錯誤的生成器設置：Visual Basic自動對象，或 VBScript程序。err對象含有關于運行時錯誤的信息。接受用于生成和清除運行時錯誤的Raise 和Clear方法。當發生運行時錯誤時，Err的屬性由標識錯誤的唯一信息以及可用于處理它的信息填充。要在代碼中生成運行時錯誤，請用Raise方法。
Err 對象的屬性
Number 屬性 錯誤號。Number 是 Err 對象的默認屬性，可讀可寫。語法：
err.Number [= errornumber]
Description 屬性 返回或設置與錯誤相關聯的說明性字符串。語法：
err.Description [= stringexpression]
Source 屬性 返回或設置最初生成錯誤的對象或應用程序的名稱。語法：
err.Source [= stringexpression]
HelpFile 屬性 設置或返回幫助文件的完整有效路徑。 語法:
err.HelpFile [= contextID]
contextID是幫助文件的完整有效路徑。
HelpContext 屬性 設置或返回幫助文件主題的上下文 ID。語法:
err.HelpContext [= contextID]
contextID是在幫助文件中幫助主題的有效標識符。
Err 對象的方法
Raise方法 生成運行時錯誤。語法：
err.Raise(number, source, description, helpfile, helpcontext)
number是錯誤號，長整數子類型。VBScript 錯誤有VBScript
定義和用戶定義兩種錯誤，錯誤號的范圍在0-65535 之間。number參數是必須的，其它參數是可選的，用來設置err對象的某屬性。如果不指定某些參數且Err對象的屬性設置含有未清除的值，則這些值將成為錯誤的值。
Clear 方法 清除 Err 對象的所有屬性設置。語法：
err.Clear
在錯誤處理后，使用Clear 顯式地清除Err 對象，此操作是必須的，在任何時候執行下列語句，VBScript 將自動調用 Clear 方法：
On Error Resume Next
Exit Sub
Exit Function
例程1 生成并顯示第6號錯誤。
代碼
On Error Resume Next
Err.Raise 6 '發生溢出錯誤。
MsgBox ("Error # " & CStr(Err.Number) & " " & Err.Description)
Err.Clear ' 清除錯誤。
例程2 建立用戶自己的錯誤號和錯誤信息。
代碼
On Error Resume Next
Err.Raise vbObjectError + 1, "SomeObject" ' 產生對象錯誤 #1.
MsgBox ("Error # " & CStr(Err.Number) & " " & Err.Description & " " & Err.source)
Err.Clear ' 清除錯誤。
運行：
代碼注釋
例程1演示的是VBScript定義的錯誤，而例程2演示的是用戶定義的錯誤。
目標任務 把VBScript定義的前100個錯誤信息顯示出來。
代碼
sub showErr(i)
On Error Resume Next
Err.Raise i
document.write ("Error # " & CStr(Err.Number)&" "& Err.Description & " ")
Err.Clear
End sub
for i =0 to 100
showErr i
next
對比 Javascript中做不到這一點。
參考 On Error語句
On Error啟動錯誤處理程序。語法：
On Error Resume Next
若不使用On Error語句，發生的任何運行時錯誤都將是致命的，即顯示錯誤信息并終止運行。On
Error 會使程序從緊隨產生錯誤的語句之后的語句繼續執行，或是從緊隨最近一次調用過程（該過程含有On Error 語句）的語句繼續運行。這個語句可以不顧運行時錯誤，繼續執行程序，之后您可以在過程內部建立錯誤處理例程。在調用另一個過程時，On Error語句變為非活動的。所以，如果希望在例程中進行內部錯誤處理，則應在每一個調用的例程中執行On Error語句
文章來源于領測軟件測試網 http://www.kjueaiud.com/
