VBS教程：VBscript属性-Source 属性

Source 属性

返回或设置最初生成错误的对象或应用程序的名称。

object.Source [= stringexpression]

参数

object

Err 对象。

stringexpression

字符串表达式，表示生成错误的应用程序。

说明

Source 属性指定一个字符串表达式，此表达式通常是导致错误的对象的类名称或程序设计的 ID。当代码无法处理可访问对象产生的错误时，请使用 Source 为用户提供信息。例如，如果访问 Microsoft Excel 并且产生一个被零除的错误，Microsoft Excel 将 Err.Number 设置为此错误的错误代码并将 Source 设置为 Excel.Application。注意，如果错误产生于另一个由 Microsoft Excel 调用的对象中，则 Excel 截获此错误并且将 Err.Number 设置为它自己的被零除的代码。但是，它保留其他 Err 对象（包括 Source），就象由产生错误的对象设置一样。

Source 总是含有最初产生错误的对象名称，您可根据所访问对象的错误信息文档，编写处理错误的代码。若错误处理程序失败，则可使用 Err 对象信息为用户描述错误，使用 Source 和其他 Err 通知用户最初导致错误的对象、错误描述等等。

在代码中产生错误时，Source 是应用程序的程序设计 ID 。

下面代码举例说明如何使用 Source 属性:

On Error Resume NextErr.Raise 6   ' Raise an overflow error.MsgBox ("Error # " & CStr(Err.Number) & " " & Err.Description & Err.Source)Err.Clear   ' Clear the error.