经典ASP:捕获错误
Min*_*ame 7 custom-error-pages asp-classic
是否有可能在全球范围内捕获Classic ASP中的所有500个错误？也许是IIS中的东西.我现在正在使用II6.我喜欢捕获错误消息,然后将其存储在数据库中.我知道它可能在ASPX页面中,但不知道你在经典asp中的确切方式.
谢谢
Jon*_*ood 15
是的,创建一个asp页面,将错误详细信息记录到数据库,并将其设置为IIS中的500处理程序页面,如下所示.
使用Server.GetLastError对象在处理程序脚本中获取错误的详细信息.
最好是在500处理程序中登录文本文件而不是数据库以获得弹性.
- 如果这不起作用，请为“500.100”错误设置自定义错误页面。这是 ASP Classic 返回的实际错误。（另外，如果您的站点运行多种语言，则 ASP 与其他任何语言都可以有不同的错误页面。如果您希望 ASP 记录错误，这会很方便！例如，“500.100”由“error.asp”处理，“500”由“error.asp”处理通过`error.php`。） (2认同)
补充Jon的答案,使用此脚本将错误写入日志文件:
<%
'Set this page up in IIS to receive HTTP 500 errors
''Type' needs to be 'URL' and the URL is e.g.: '/500Error.asp' if this file is named '500Error.asp' and is in the site root directory.
'This script assumes there is a "/Log" folder, and that IIS has write access to it.
Const ForReading = 1, ForWriting = 2, ForAppending = 8
Const TristateUseDefault = -2, TristateTrue = -1, TristateFalse = 0
Dim objFSO, err
Set objFSO=CreateObject("Scripting.FileSystemObject")
Set err = Server.GetLastError()
outFile=Server.MapPath("/Log/ErrorLog.txt")
Set objFile = objFSO.OpenTextFile(outFile, ForAppending, True, TristateTrue)
objFile.WriteLine Now & " - ERROR - ASPCode:" & err.ASPCode & " ASPDescription: " & err.ASPDescription & " Category: " & err.Category & " Description: " & err.Description & " File: " & err.File & " Line: " & err.Line & " Source: " & err.Source & vbCrLf
objFile.Close
Set objFile = Nothing
Set err = Nothing
%>
经典 ASP 中的错误处理是一种完全的痛苦。您可以使用 捕获您认为将要发生on error resume next的错误，然后检查以下代码行中的错误代码。
或者，您可以扫描服务器日志中的 500 个错误。或在您的 IIS 设置中设置“500 错误”页面。
On Error Resume Next
... do something...
If Err.Number <> 0 Then
... handle error
end if