Consulta sobre On Error Resume Next

Adler · #1 (**permalink**) 19/10/2007, 11:45

Hola, estoy intentando crear un mensaje amigable ante cualquier problema que pueda surgir al carga la pagina. Mi pregunta es, si os parece adecuado la forma en que muestro el mensaje o se me ha olvidado algo o he de quitar algo.

Código PHP:

  <%@LANGUAGE="VBSCRIPT"%>
<% Option Explicit %>
<%Response.Buffer=True%>
<% On Error Resume Next %>
<head>
</head>
<body>
Algo de texto...
<%
Call Conexion
Call Registro (rs)

SQL="Select ..... "

rs.Open SQL ....

If Err <> 0 then
Response.Clear ' Limpio buffer
Call AvisoError ' Llamo al sub
Err.Clear '
End If
On Error GoTo 0

' =================== SUB ==========

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">

<html>
<head>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=ISO-8859-15">


  <!-Hoja de estilos -->
<link rel="STYLESHEET" type="text/css" media="all" href="./estilos_01.css">

</head>
<body class="body">
<table border="0px" bgcolor="#b6b6b6" border="0px" cellpadding="0px" cellspacing="1px" width="400px">
<tr>
<td>
Mensaje para el cliente
</td>
</tr>
</table>
</td>
</tr>
</table>


<%
'Cierro todas las conexiones
Call LimpiarRS (rs)
Call LimpiarConexion
' Detengo proceso y devuelvo el contenido del buffer
Response.End 
%>

</body>
</html>

Gracias

PosProdukcion · #2 (**permalink**) 22/10/2007, 02:37

En general creo que esta bien, aunque no entiendo muy bien porque haces goto en error, despues de capturar el error, podrias hacer que entre en un bucle

On Error GoTo 0

Otra cosa, cuanto antes liberes recursos más rápido irá el servidor y más protegido frente a errores, así que mejor llamas a

Código:

'Cierro todas las conexiones
Call LimpiarRS (rs)
Call LimpiarConexion

En el momento en que dejen de hacerte falta esos objetos, antes de llamar al SUB

Adler · #3 (**permalink**) 23/10/2007, 04:12

¿Qué tal PosProdukcion?

Gracias por contestar, le he echado un vistazo a lo que me dices y creo que tienes toda la razón.

Gracias de nuevo