David's Learning: 處理頁面執行時發生的錯誤？

2013年9月25日星期三

處理頁面執行時發生的錯誤？

<%@ LANGUAGE="VBScript" %>
<%
      Response.Buffer = True ' 打開頁面緩衝
      On Error Resume Next ' 打開錯誤處理
      …………' ASP代碼
%>

<%
If Err.Number <> 0 Then ' 錯誤處理
Response.Clear ' 清除緩衝區
%>

<HTML>' 顯示錯誤資訊頁面
<HEAD>
<TITLE>頁面錯誤報告</TITLE>
</HEAD>

<BODY BGCOLOR="#C 0C 0C 0">
<font color=red>
<p>頁面錯誤報告</p>

錯誤號:<%= Err.Number %><BR>錯誤描述:<%= Err.Description %><BR> 錯誤源:Source <%= Err.Source %><BR>錯誤發生行:<%= Err.Line %><BR>
</BODY>
</HTML>
<%
End If
%>