可以讓程序告訴我詳細(xì)的頁(yè)面錯(cuò)誤和數(shù)據(jù)庫(kù)連接錯(cuò)誤嗎?
<%
If Err.Number <> 0 Then
' 錯(cuò)誤處理.
Response.Clear
' 清除緩沖區(qū).
Select Case Err.Number
' 根據(jù)不同錯(cuò)誤分處理.
Case ""
' 指定錯(cuò)誤類型:此處填加我們指定的錯(cuò)誤處理代碼.
Case Else
If IsObject(objConnection) Then
If objConnection.Errors.Count > 0 Then %>
<B>撼雪噴云之?dāng)?shù)據(jù)連接對(duì)象錯(cuò)誤報(bào)告</B>
<% For intLoop = 0 To objConnection.Errors.Count - 1 %>
錯(cuò)誤號(hào): <%= objConnection.Errors(intLoop).Number %><BR>
錯(cuò)誤描述: <%= objConnection.Errors(intLoop).Description %><BR>
錯(cuò)誤源: <%= objConnection.Errors(intLoop).Source %><BR>
SQL狀態(tài): <%= objConnection.Errors(intLoop).SQLState %><BR>
本地錯(cuò)誤: <%= objConnection.Errors(intLoop).NativeError %><P>
<% Next
End If
End If
If Err.Number <> 0 Then %>
<B>撼雪噴云之頁(yè)面錯(cuò)誤報(bào)告</B><BR>
錯(cuò)誤號(hào):<%= Err.Number %><BR>
錯(cuò)誤描述:<%= Err.Description %><BR>
錯(cuò)誤源:<%= Err.Source %><BR>
錯(cuò)誤發(fā)生行:<%= Err.Line %><P>
<%
End If
End Select
End If
%>
[1]
相關(guān)文章
如何遠(yuǎn)程讀取數(shù)據(jù)庫(kù)頁(yè)面?
如何遠(yuǎn)程讀取數(shù)據(jù)庫(kù)頁(yè)面?...2006-11-11如何最準(zhǔn)確地統(tǒng)計(jì)在線用戶數(shù)?
如何最準(zhǔn)確地統(tǒng)計(jì)在線用戶數(shù)?...2006-11-11如何防范利用刷新來(lái)“作弊”的計(jì)數(shù)器?
如何防范利用刷新來(lái)“作弊”的計(jì)數(shù)器?...2006-11-11