クラシックASPの500個のエラーすべてをグローバルレベルでキャプチャすることは可能ですか?たぶんIISの何か。現在、II6を使用しています。エラーメッセージをキャプチャしてデータベースに保存するのが好きです。ASPXページでそれが可能であることは知っていますが、従来のaspでどのように行うかは正確にはわかりません。
ありがとうございました
クラシックASPの500個のエラーすべてをグローバルレベルでキャプチャすることは可能ですか?たぶんIISの何か。現在、II6を使用しています。エラーメッセージをキャプチャしてデータベースに保存するのが好きです。ASPXページでそれが可能であることは知っていますが、従来のaspでどのように行うかは正確にはわかりません。
ありがとうございました
はい、エラーの詳細をデータベースに記録するaspページを作成し、これを以下のようにIISの500ハンドラーページに設定します。
Server.GetLastErrorオブジェクトを使用して、ハンドラースクリプトのエラーの詳細を取得します。
復元力を確保するために、500ハンドラーのDBではなくテキストファイルにログインすることをお勧めします。
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