如果错误类型会再次引发错误

Question

我在查询时正在查找特定数据库错误。如果没有找到错误，那么我想要使用标准错误处理。

On Error Resume Next 

db.execute(strSQL) 

If db.Errors.Count > 0 Then 
    If InStr(db.Errors(0).Description, "IX_Code") Then 
     ... 
    Else 
     * rethrow here * 
    End If 
End If 

这可能吗？

我想...

On Error GoTo 0 

Err.Raise 22, "Big Error", "Hello World!" 

但没有任何反应。

Answer 1

我加入这个代码，我发现here ...

For Each errLoop In db.Errors 

     strError = "Error #" & errLoop.Number & "<br>" & _ 
      " " & errLoop.Description & "<br>" & _ 
      " (Source: " & errLoop.Source & ")" & "<br>" & _ 
      " (SQL State: " & errLoop.SQLState & ")" & "<br>" & _ 
      " (NativeError: " & errLoop.NativeError & ")" & "<br>" 

     Response.Clear 
     Response.Write("<p>" & strError & "</p>") 
     Response.End 

    Next