软件测试工具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语句
