17/01/2008, 04:02
|
| | | Fecha de Ingreso: marzo-2006
Mensajes: 12
Antigüedad: 19 años, 1 mes Puntos: 0 | |
| Control de errores
Tengo que añadir una gestion de errores a una intranet. He hecho una prueba y no me funciona por lo que el problema está en mi código. La prueba es la siguiente
DIM XERROR,N1,N2
On error Resume Next
if err.number<>0 then muestraerror()
N1=10
N2=0
RESPONSE.Write("valor=" & n1/n2)
function muestraerror()
response.Write("Error : " & err.number & "-" & err.DESCRIPTION)
end function
Me debería dar un error e imprimirmelo en la rutina muestraerror pero no lo hace. (siempre err.number es 0). El caso es que si quito el control de errores si me aparece el error. "Division por cero"
¿ Donde está el problerma?
Gracias |