Visual Basic - Manejar Errores

Life is soft - evento anual de software empresarial
 
Vista:
sin imagen de perfil

Manejar Errores

Publicado por Richard (51 intervenciones) el 08/12/2015 22:53:39
Con el siguiente código manejo posibles errores de conexion a la red Lan al buscar la base de datos:

1
2
3
4
5
6
7
On Error GoTo fallo
Data1.DatabaseName = ReadIniValue(App.Path & "\ruta.ini", "bd", "ruta")
Data1.RecordSource = "usuarios"
Data1.Refresh
Exit Sub
fallo:
MsgBox "Ocurrio un error: " & Err.Description, vbExclamation, "ATENCIÓN"

De esta forma no se cierra la aplicación sino que una vez solucionado los posibles problemas de conexión le doy aceptar y carga la base de datos; sin embargo queria saber si hay otra manera de manejar esa clase de errores porque sino tendría que colocar ese codigo en todos los formularios que llamen a la base de datos.

Uso vb 6.0 con access 2007. Gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder