• Domingo 17 de Noviembre de 2024, 16:58

Autor Tema:  Ayuda Con Botones Nuevo Y Guardar  (Leído 830 veces)

Alverigk

  • Nuevo Miembro
  • *
  • Mensajes: 1
  • Nacionalidad: 00
  • Serenidad y Paciencia, Mi querido Solín.
    • Ver Perfil
Ayuda Con Botones Nuevo Y Guardar
« en: Viernes 1 de Junio de 2007, 08:48 »
0
:devil: Hola a todos. :devil:

Necesito ayuda, estoy haciendo una agenda con VS 2005, con botones Nuevo y Guardar.
El código del Botón Nuevo.

         Dim newContactoRow As GenteDataSet.ContactoRow --------------->(1)
         newContactoRow = GenteDataSet.Contacto.NewContactoRow() ---->(2)

         GenteDataSet.Contacto.Rows.Add(newContactoRow)---------------->(3)

        NombreTextBox.Text = ""
        ApellidosTextBox.Text = ""
        NombreTextBox.Focus()      

El código del Botón Guardar.

Try
    Me.Validate()
    Me.CustomersBindingSource.EndEdit()----------------------------------->(4)
    Me.CustomersTableAdapter.Update(Me.NorthwindDataSet.Customers)
    MsgBox("Update successful")

        NombreTextBox.Text = ""
        ApellidosTextBox.Text = ""
        NombreTextBox.Focus()

Catch ex As Exception
    MsgBox("Update failed")
End Try


Cuando corro el programa tal y como arriba indiqué, no guarda nada.

Cuando cambio el EndEdit por Addnew en la línea de código 4; corro el programa, no guarda el primer registro, el segundo sí, y así sucecivamente. El BD deja un registro en blanco entre cada regsitro.
Cuando elimino las líneas de código 1, 2 y 3; y cambio el EndEdit por AddNew en la línea 4; corro el programa y comienzo a ingresar datos, el primer registro no lo guarda, el segundo, sí, y así sucesivamente.
Cuando no modifico nada del código mostrado arriba, hago click en Nuevo y aparta espacio en la BD y guarda el registro, pero cuando vuelvo a guardar un registro nuevo, edita el registro que guarde anteriormente.

Lo que quiero hacer es guardar los datos a la primera y que no modifique los registros ya guardados.
Podrián indicarme que estoy haciendo mal?

De antemano muchas gracias!!!

Alverigk
Serenidad y Paciencia, Mi querido Solín.