ASP clásico: errores de captura

Question

¿Es posible capturar los 500 errores en ASP clásico a nivel global? Tal vez algo en IIS. Estoy usando II6 en este momento. Me gusta capturar el mensaje de error y luego almacenarlo en la base de datos. Sé que es posible en páginas ASPX, pero no sé exactamente cómo te va en ASP clásico.

Gracias

Answer 1

Sí, crear una página ASP que ingrese los detalles del error a la base de datos, y establecer que se trata de la página 500 controlador en IIS como a continuación.

Utilice el objeto Server.GetLastError para obtener los detalles del error en el script del controlador.

Puede ser una buena idea iniciar sesión en un archivo de texto en lugar de un DB en su controlador 500 para mayor flexibilidad.

Answer 2

manejo en ASP clásico error es un dolor completa. Puede detectar el error donde cree que va a ocurrir usando on error resume next, luego verifique el código de error en la siguiente línea de código.

De forma alternativa, puede escanear los registros del servidor en busca de 500 errores. o configure una página de "500 errores" en su configuración de IIS.

On Error Resume Next 
... do something... 
If Err.Number <> 0 Then 
... handle error 
end if 

Answer 3

Como complemento de la respuesta de Jon, utilizar este script para escribir los errores a un archivo de registro:

<% 
'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 

%> 

Answer 4

Para añadir a la respuesta de @ Jon Eastwood - si está utilizando IIS 7.5, entonces en vez de "errores personalizados "va a buscar" Páginas de error .NET" por la imagen de abajo:

Esto se aplica a Windows Server 2008 y otros nuevos SKUs de Windows.