Error de Conexión ODBC desde una ASP
Disculpa yo te envíe una pregunta ayer y me la respondiste bastante rapido, gracias, en realidad lo que me sucede es que el servidor web pierde la comunicación con el servidor de data y cuando se ejecuta miTabla.Open devuelve Microsoft ODBC... Lo que necesito es saber como saber si miTabla.Open regreso un error para desplegar un mensaje en lugar de que aparezca Microsoft ODBC ...
1 Respuesta
Respuesta de jaibee
1
Prueba a utilizar una sentencia On error
<%
On Error goto RespuestaError
MiTabla. Open
.
.
.
RespuestaError:
Response.Write "Ha sucedido un error"
%>
No se si esto funcionara con ASP .. aunque lo puedo probar si lo necesitas...
<%
On Error goto RespuestaError
MiTabla. Open
.
.
.
RespuestaError:
Response.Write "Ha sucedido un error"
%>
No se si esto funcionara con ASP .. aunque lo puedo probar si lo necesitas...
Perdón te agradezco mucho tu ayuda y aunque hasta hace unos días no conocía On Error goto... fíjate que no funciona en ASP o al meno no a mi no se si tu puedes Probarlo y contarme si funciona Mil Gracias
Bueeeeeno... no nos preocupemos...
Me he documentado un poco más, y aunque no lo he podido probar... esto SI tendría que funcionar
<%
' Manejo de un error en VBscript
' "On error resume next" hace que en caso de producirse un error no salte el evento...
On Error Resume Next
miTabla.Open
' Si la instruccion anterior ha provocado un error, el objeto Err tiene la informacion
if Err.Number <> 0 then
Response.Write "Ha ocurrido un error al abrir la tabla<br>Informacion del error: " & CStr(Err.Number) & " " & Err.Description
Err.Clear ' Clear the error.
else
' Aqui el resto del codigo porque todo ha ido bien :)
end if
%>
Venga, a ver si esto te funciona... y perdón por la metida de pata anterior...
Me he documentado un poco más, y aunque no lo he podido probar... esto SI tendría que funcionar
<%
' Manejo de un error en VBscript
' "On error resume next" hace que en caso de producirse un error no salte el evento...
On Error Resume Next
miTabla.Open
' Si la instruccion anterior ha provocado un error, el objeto Err tiene la informacion
if Err.Number <> 0 then
Response.Write "Ha ocurrido un error al abrir la tabla<br>Informacion del error: " & CStr(Err.Number) & " " & Err.Description
Err.Clear ' Clear the error.
else
' Aqui el resto del codigo porque todo ha ido bien :)
end if
%>
Venga, a ver si esto te funciona... y perdón por la metida de pata anterior...
