Foros del web, para los que viven de bits

noah_242 · 10-ene-2005, 03:04

Hola a todos¡Me gustaria poder controlar un error que tengo,es decir que no me salga la pantalla de error y que me saliera un msgbox en su lugar dando una informacion.Muchas gracias a todos¡Saludos

noah_242 · 10-ene-2005, 04:18

Hola¡Ya encontre la solucion,os pongo el codigo por si ha alguien le sirve,os explico de que iba,pues bien mi codigo debia servir para comprobar que si la conexion a la base de datos estaba mal pues omitir el error y t mostrara un mensajito.

On Error GoTo errors

Me.MySqlConnection1.UserId = b
Me.MySqlConnection1.Password = c
Me.MySqlConnection1.Host = d

Me.MySqlDataAdapter1.Fill(DataSet11)

On Error GoTo 0

Exit Sub
errors:
MsgBox(" Datos incorrectos ")

End Sub

freegirl · 10-ene-2005, 04:22

hola!

pues:

Cita:

Try

'pones aqui el código a controlar

Catch ex As Exception
' código cuando se produzca el error
'puedes poner que salga el mensaje con el error

msgbox(ex)

'o personalizar el mensaje de error

msgbox("Ha ocurrido un error. bla bla bla")

Finally

noah_242 · 10-ene-2005, 04:33

Hola Freegirl¡Gracias por tu codigo,lo probare ahora,se nota que es mas depurado que el mio,jejeje,bueno lo saque comiendome el coco.Saludos y gracias¡

10-ene-2005, 03:04	#1 (permalink)
noah_242 Fecha de Ingreso: agosto-2004 Mensajes: 234	Controlar los errores Hola a todos¡Me gustaria poder controlar un error que tengo,es decir que no me salga la pantalla de error y que me saliera un msgbox en su lugar dando una informacion.Muchas gracias a todos¡Saludos

Herramientas
Mostrar Versión Imprimible Enviar por Correo
Desplegado
Mode Lineal Cambiar a Modo Hibrido Cambiar a Modo Hilado

10-ene-2005, 04:18	#2 (permalink)
noah_242 Fecha de Ingreso: agosto-2004 Mensajes: 234	Hola¡Ya encontre la solucion,os pongo el codigo por si ha alguien le sirve,os explico de que iba,pues bien mi codigo debia servir para comprobar que si la conexion a la base de datos estaba mal pues omitir el error y t mostrara un mensajito. On Error GoTo errors Me.MySqlConnection1.UserId = b Me.MySqlConnection1.Password = c Me.MySqlConnection1.Host = d Me.MySqlDataAdapter1.Fill(DataSet11) On Error GoTo 0 Exit Sub errors: MsgBox(" Datos incorrectos ") End Sub

10-ene-2005, 04:22	#3 (permalink)
freegirl Fecha de Ingreso: octubre-2003 Ubicación: Catalunya Mensajes: 2.292	hola! pues: Cita: Try 'pones aqui el código a controlar Catch ex As Exception ' código cuando se produzca el error 'puedes poner que salga el mensaje con el error msgbox(ex) 'o personalizar el mensaje de error msgbox("Ha ocurrido un error. bla bla bla") Finally

10-ene-2005, 04:33	#4 (permalink)
noah_242 Fecha de Ingreso: agosto-2004 Mensajes: 234	Hola Freegirl¡Gracias por tu codigo,lo probare ahora,se nota que es mas depurado que el mio,jejeje,bueno lo saque comiendome el coco.Saludos y gracias¡