On Error 语句
    该语句的作用是：启用或禁用错误处理程序。一般用法如下： [转自：711网络工作室 http://www.tc711.com]

    On Error Resume NextOn Error GoTo 0  [转自：711网络工作室 http://www.tc711.com]

    如果在您的代码中未使用On Error Resume Next语句，所发生的运行时错误将显示错误信息，同时，代码的执行也随之终止。

    但当你采用它时，就会使程序按照产生错误的语句之后的语句继续执行，或是按照最近一次所调用的过程（该过程含有 On Error Resume Next 语句）中的语句继续运行。这个语句可以不顾运行时错误，继续执行程序，之后您可以在过程内部建立错误处理例程。

    在调用另一个过程时，On Error Resume Next 语句变为非活动的。所以，如果希望在例程中进行内部错误处理，则应在每一个调用的例程中执行 On Error Resume Next 语句。

    如果您已启用 On Error Resume Next 错误处理程序，则可使用On Error GoTo 0禁用错误处理程序。

    <script language=vbs>
    On Error Resume NextErr.Raise 6 '产生溢出错误。
    msgbox ("Error # " & CStr(Err.Number) & " " & Err.Description)cnbruce.com '缺少对象，因为cnbruce是自定义的msgbox ("Error # " & CStr(Err.Number) & " " & Err.Description)Err.com '对象不支持该属性或方法msgbox ("Error # " & CStr(Err.Number) & " " & Err.Description)Err.Clear '清除错误。
    </script>

    
    附注：要在代码中生成运行时错误，请用Err对象的Raise方法。
    这样的情况经常在调试程序的时候看见，比如分别调试下面两程序则会显示。

    1，err1.asp

    <%Err.Raise 6%>

    技术信息（用于支持人员）错误类型：Microsoft VBScript 运行时错误 (0x800A0006)溢出

    
    2，err2.asp

    <%cnbruce.com%>
    调试的时候也就是：

    技术信息（用于支持人员）错误类型：Microsoft VBScript 运行时错误 (0x800A01A8)缺少对象: 'cnbruce'

    
    但当你在首行添加了On Error Resume Next之后，发现不报错提示，表明内部错误处理完成。

    但进行下列程序的时候发现

    3，err3.asp

    <%On Error Resume Nextcnbruce.comOn Error GoTo 0cnbruce.com%>

    这时运用了On Error GoTo 0，则会显示出错信息，只不过不是第三行，而是第五行的cnbruce.com错误对象了。