Esta sirve para alertar de errores
No sirve de mucho, por que no es la mamera correcta de manejar errores, pero sirve para empezar
Código:
on error resume next
'ejecucion de algun sql contra alguna base de datos
call checa_error()
donde
Código:
sub checa_error()
if err.number <> 0 then
mensaje ("Error en tiempo de ejecucion")
imprime "<strong>NUMERO ERROR:</strong>" & err.number
imprime "<strong>DESCRIPCION ERROR:</strong>" & err.Description
imprime err.HelpContext
termina
end if
end sub
