可以让程序告诉我详细的页面错误和数据库连接错误吗？

<％ 
 If Err.Number <> 0 Then
 ' 错误处理
       Response.Clear
       ' 清除缓冲区
 
     Select Case Err.Number
            ' 根据不同错误分处理
    Case "" 
' 指定错误类型:此处填加我们指定的错误处理代码
      Case Else
 ' 一般错误
            If IsObject(objConnection) Then
                  If objConnection.Errors.Count > 0 Then ％>
<B>精彩春风之数据连接对象错误报告</B>
<％ For intLoop = 0 To objConnection.Errors.Count - 1 ％>
错误号: <％= objConnection.Errors(intLoop).Number ％><BR>
错误描述: <％= objConnection.Errors(intLoop).Description ％><BR>
错误源: <％= objConnection.Errors(intLoop).Source ％><BR>
SQL状态: <％= objConnection.Errors(intLoop).SQLState ％><BR>
本地错误: <％= objConnection.Errors(intLoop).NativeError ％><P>
<％ Next
   End If
   End If
   If Err.Number <> 0 Then ％>
<B>精彩春风之页面错误报告</B><BR>
错误号:<％= Err.Number ％><BR>
错误描述:<％= Err.Description ％><BR> 
错误源:<％= Err.Source ％><BR>
错误发生行:<％= Err.Line ％><P>
<％ 
            End If
      End Select
End If
％>