Validar datos antes d ellevarlos a la BD

20/04/2006 - 01:20 por villacr | Informe spam
Hola tengo el siguiente codigo en un boton

Private Sub cmdGuardar_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles cmdGuardar.Click

If Me.ValidateChildren Then
Me.TBLtecnicosBindingSource.EndEdit()
Me.TBLtecnicosTableAdapter.Update(Me.DStecnicos.TBLtecnicos)
System.Windows.Forms.MessageBox.Show(Me, "Registro Guardado")
Me.Close()
Else
System.Windows.Forms.MessageBox.Show(Me, "Error al guardar los datos")
End If
End Sub

Supongo que aqui debe de validar los datos antes de guardarlos..pero
no creo que lo haga puesto que si no lleno ningun campo y l doy guardar me
salta un error donde me dice que el campo nombre no es Nullentoncs que
tipo de validacion me esta haciendo este codigo.

...Quiero mencionar que tengo un ErrorProvider con el cual en el evento
validating de cada caja de texto valido si esta vacia de eser asi me manda
un mensaje que la caja esta vacia que debo de ingresar un dato


Alguien podria explicarme com deo valdar los datos...Gracias

Preguntas similare

Leer las respuestas

#1 Jesús López
20/04/2006 - 10:20 | Informe spam
Nos falta ver el código que tienes en el evento Validating de las cajas de
texto, ya que el defecto podría estar allí.

ValidateChildren parece funcionar correctamente, el siguiente código
funciona como se espera:

Private Sub TextBoxes_Validating(ByVal sender As System.Object, ByVal e
As System.ComponentModel.CancelEventArgs) Handles TextBox1.Validating,
TextBox2.Validating
Dim TextBox As TextBox = sender
If TextBox.Text = "" Then
e.Cancel = True
End If
End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
If Not Me.ValidateChildren() Then
MsgBox("Datos no válidos")
End If
End Sub

Por cierto, deberías incluir el código en un bloque try..catch ya que tanto
EndEdit como Update pueden lanzar una excepción y supongo que no querrás que
por alguna cosa que hayas pasado por alto (siempre hay alguna) tu aplicación
"casque" por una excepción no controlada.


Saludos:

Jesús López
MVP VB
Solid Quality Learning
www.solidqualitylearning.com



"villacr" escribió:

Hola tengo el siguiente codigo en un boton

Private Sub cmdGuardar_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles cmdGuardar.Click

If Me.ValidateChildren Then
Me.TBLtecnicosBindingSource.EndEdit()
Me.TBLtecnicosTableAdapter.Update(Me.DStecnicos.TBLtecnicos)
System.Windows.Forms.MessageBox.Show(Me, "Registro Guardado")
Me.Close()
Else
System.Windows.Forms.MessageBox.Show(Me, "Error al guardar los datos")
End If
End Sub

Supongo que aqui debe de validar los datos antes de guardarlos..pero
no creo que lo haga puesto que si no lleno ningun campo y l doy guardar me
salta un error donde me dice que el campo nombre no es Nullentoncs que
tipo de validacion me esta haciendo este codigo.

...Quiero mencionar que tengo un ErrorProvider con el cual en el evento
validating de cada caja de texto valido si esta vacia de eser asi me manda
un mensaje que la caja esta vacia que debo de ingresar un dato


Alguien podria explicarme com deo valdar los datos...Gracias
Respuesta Responder a este mensaje
#2 villacr
21/04/2006 - 16:25 | Informe spam
Est codigo me funcionó de maravilla...Muchas Gracias Jesús

veras soy novato en este lenguaje..apenas lo estoy aprendiendo, para esto
estoy hacindo un sistema para mi departamento (soporte tecnico) , entonces no
se si me pudieras explicar que hace este codigo...ya lo estudie y le entendi
un poco..prome gustaria de ser posible me explicaras con tus palabras...si no
es mucho pedir...Gracias de antemano.
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida