ASP错误捕获的几种常规处理方式(2)

日期：2020-05-13 栏目：程序人生浏览：次

你们上面看到了，我首先设置On Error Resume Next ，这样出现错误就不会影响程序的执行。

错误处理和数据库
在错误处理中加入数据库的执行是很复杂的。假若我们有一个程序，有很多的命令去向数据库中添加记录，如果insert/update在程序的最底部执行，如果我们前面又错误发生，那就完了！我们就会向数据库中添加了一个错误的信息。因为我们用了On Error Resume Next 一切的错误都被忽略了！即使前面出错，程序依旧会向数据库中添加数据的。
为避免这种情况，我们就先得做些手脚，正确处理的方法如下：

 If Err.Number = 0 And objConnection.Errors.Count = 0 Then
 
 '这里才能执行语句，因为没有错误
 Set rstResults = dbData.Execute(txtSql) 
 End If

更多高级的处理办法
当一个错误发生时，你们也可以显示更多的错误信息。下面是同时处理数据库和页面错误的例子，有了它我们一下就能发现我们程序中的所有错误。（由于有些地方我觉得英文更能说时问题，所以没有翻译）。

<% 
 If Err.Number <> 0 Then
      Response.Clear
      Select Case Err.Number
  Case 8 '指定错误的Number
 '在这里处理自定义错误 
 
        Case Else   '一般错误
 
   If IsObject(objConnection) Then
       If objConnection.Errors.Count > 0 Then
 %>

              <B>Database Connection Object</B>
 
 <%    For intLoop = 0 To objConnection.Errors.Count - 1 %>
 
             Error No: <%= objConnection.Errors(intLoop).Number %><BR>
             Description: <%= objConnection.Errors(intLoop).Description %><BR>
             Source: <%= objConnection.Errors(intLoop).Source %><BR>
             SQLState: <%= objConnection.Errors(intLoop).SQLState %><BR>
             NativeError: <%= objConnection.Errors(intLoop).NativeError %><P>
 
 <% Next
 End If
  
       End If
      If Err.Number <> 0 Then
 %>
 
           <B>Page Error Object</B><BR>
           Error Number <%= Err.Number %><BR>
           Error Description <%= Err.Description %><BR> 
        Source <%= Err.Source %><BR>
    LineNumber <%= Err.Line %><P>
 
 <%   End If
    End Select
  End If
 %>

上面的例子让我们一下了处理了很多在数据库中出现的问题，这个在我们日常编程也是常用的！我们也应该看到那个Select Case 语句，它能让我们来处理特定的错误。
Redirect 和错误处理
有一点我们就当注意一下，就是我们常用到的redirect对象，如果一个页面中出现了redirect对象，那么错误处理就失去了意义。所以在转向之前我们还得处理一下，如下：

ASP错误捕获的几种常规处理方式(2)

相关推荐