捕获站点中的 ASP 和 SQL 错误

引言

本文档展示了如何捕获网站中的 ASP 和 SQL 错误。

首先要做的是更改网站属性中的自定义错误。
[内部服务器错误] - HTTP 错误 500 & 500;5001 更改为这个 URL -> /trap.asp 

现在创建 trap.asp 文件，使用下面的代码。

代码列表

<%
Const lngMaxFormBytes = 200

Response.Buffer = true

If Response.Buffer Then
    Response.Clear
    Response.Status = "500 Internal Server Error"
    Response.ContentType = "text/html"
    Response.Expires = 0
End If

Set objASPError = Server.GetLastError

strServername     = LCase(Request.ServerVariables("SERVER_NAME"))
strServerIP     = Request.ServerVariables("LOCAL_ADDR")
strRemoteIP     = Request.ServerVariables("REMOTE_ADDR")
strCategory     = objASPError.Category
strASPCode     = Server.htmlEncode(objASPError.ASPCode)
intNumber     = objASPError.Number
strFile         = objASPError.File
intLine         = objASPError.Line
intColumn     = objASPError.Column
strSource     = server.htmlEncode(objASPError.Source)
strDescription     = Replace(Server.htmlEncode( _
    objASPError.Description),"'","-")
strASPDescription= Replace(Server.htmlEncode( _
    objASPError.ASPDescription),"'","-")

Response.Write "Sorry, but the site is not available."
%>

您可以将错误信息通过电子邮件发送给网站管理员。