Hola Shiryu
, yo no uso response.clear() en el sub ya que el buffer de la página en ocasiones es true y otras false.
Código PHP:
Sub AvisoError (inst)
%>
Mensaje de error
<%
Archivo log de errores
Dim objetivo, fso, archivo
objetivo = Request.ServerVariables("APPL_PHYSICAL_PATH") & "Errores\LogErrores.txt"
Set fso = Server.CreateObject("Scripting.FileSystemObject")
Set archivo = fso.OpenTextFile (objetivo, 8, true)
archivo.WriteLine("Fecha -> " & Now())
archivo.WriteLine("Sección -> " & seccion)
archivo.WriteLine("Instrución -> " & inst)
archivo.WriteLine("Error -> " & Err.Description)
archivo.WriteLine("--------------------------------------------")
archivo.Close()
Set archivo = Nothing
Set fso = Nothing
End Sub
%>
Lo llamo así
Código PHP:
if Err.number <> 0 Then
Response.Clear ()
Call AvisoError (SQL)
Err.Clear ()
'Libero memoria y cierro todo
Call LimpiarRS (rs)
Call LimpiarConexion (fconn)
Response.End ' Para la ejecución del resto del código
end if
¿Veis algo que sobre o que falte? ¿Qué os parece?
