Modulo de errores

[gasafonso]

Hola quiera saber si se puede hacer un modulo de errores, donde todos los errores que surjan en el sistema se puedan grabar en un .txt
La funcion de para garbar en el txt ya la tengo, lo que no se es como hacer para captar los errores sin necesidad de poner en cada "eveento" o "funciones" una instruccion

Espero haber sido claro

gracias !!!

[gasafonso]

Nadie me puede ayudar con esto ? POR FAVOR SEÑORES.... sean mas gentiles
gracias !!

[gasafonso]

Evidentemente esto no es para cualquiera j aja !!!!

[JonathanB]

Creo que la definición de «colocarlo en cada evento o funciones» espanto a las posibles respuestas.

Se coloca código de manejo de errores en lugares que uno sabe que puedan generar error. Por ejemplo en C# cuando el código que uno esta realizando puede generar una excepción (error), se utiliza una verificación con la instrucción «try catch».

Ref. Pokémon Exception Handling

Código C#:

try{
   // Código que puede generar error
}
catch{
   // Manejo de expeción o error
}
 

En VB6 se utiliza normalmente On Error GoTo ErrorHandler.

Código vb:

Public Sub ErrorHandling(arg1 As Integer)
On Error GoTo ErrorHandler
    Dim var1 As Integer
    var1 = 1 / arg1
    MsgBox var1
    MsgBox arg1
    Exit Sub
ErrorHandler:
    MsgBox Err.Description, , "Error"
End Sub
 

Depende del tipo de error y del manejo que le des al mismo el que consideres registrarlo en un log.

Saludos,

[gasafonso]

Pero esto donde lo pones? En el load ? o dentro de un modulo?
Grracias

Ah perdon y para guardar los errores en algun txt

[JonathanB]

Lo pones en cada rutina que pueda generar un error grave para la aplicación.

Por ejemplo

Código vb:

Public Sub RutinaConPosibleError(ByVal arg1 As Integer)
    Dim var1 As Integer
 
' Al existir un error, ir a la etiqueta ErrorHandler
On Error GoTo ErrorHandler
 
    ' Posible error, división entre cero.
    var1 = 1 / arg1
    ' Si existe error en la división anterior, este código no se ejecutará, sino que se saltará a la etiqueta ErrorHandler
    MsgBox var1
    MsgBox arg1
' Si todo va bien, hay que salir del procedimiento para no entrar en el manejo del error que se encuentra abajo
    Exit Sub
 
' Etiqueta ErrorHandler
ErrorHandler:
    ' Aquí pones el manejo de tu error, por ejemplo se muestra el mensaje con la descripción del error. En esta parte puedes poner tu rutina para grabar la información del error en un archivo.
    MsgBox Err.Description, , "Error"
    ' Asumiendo que tu rutina es RegistrarError y acepta como parámetro un código de error, un mensaje del error y un mensaje personalizado.
    RegistrarError Err.Number, Err.Description, "Error en rutina RutinaConPosibleError"
End Sub
 

Espero que te sea de utilidad

[gasafonso]

Claro, pero yo queria evitar poner en cada rutina, hacer algun MODULO o CLASE para hacerlo mas agil
Gracias

[JonathanB]

Es que ese es el punto... no todas las rutinas te deberían dar error fatal para poner la rutina de Log.
No todos tus errores se manejan de igual manera.

[IXtremeLT]

Hola que tal, no se casi nada de VB pero estoy seguro que este artículo tiene lo que necesitas:
http://www.vb-helper.com/tut6.htm

Hay que saber que un programa puede tener errores por dos causas generales: los que se generan por excepciones de usuario (el que escribe el código) y los errores fatales que fuerzan al programa a terminar inmediatamente por razones obvias como el error de sintaxis, la llamada a una función inexistente o un loop infinito.

En PHP para manejar los errores de "usuario" se usa la función set_error_handler("miManejador", E_ALL);

Y para los errores "fatales" la función set_shutdown_error("miManejador");

Para ejecutar los errores de usuario es necesario usar la función trigger_error() y para los errores fatales no hay función ya que el programa es el que decide cuando se deberá ejecutar el manejador de errores fatales (que es lo que deseas hacer).

Saludos!

[gasafonso]

Gracias IXtremeLT, pero encima esta en INGLESSSSSSSSSS ?????NOOOOOOOOOOOO ja ja

[IXtremeLT]

Iniciado por gasafonso

Gracias IXtremeLT, pero encima esta en INGLESSSSSSSSSS ?????NOOOOOOOOOOOO ja ja

Es algo a lo que uno debe batallarle si no se sabe inglés, pués los lenguajes están escritos en inglés y nada mejor que intentar aprenderlo leyendo manuales o tutoriales en inglés, aparte que la mejor información casi siempre está en inglés, ;)

[gasafonso]

Gracias por el consejo