Cómo añadir un nuevo registro

Parte de un tutorial en curso. Esta lección es parte de una tutoría continua. El La primera parte está aquí:

Codificando sus propios proyectos de bases de datos VB .NET

En el anterior En parte, aprendiste a actualizar los registros de la base de datos. En la En parte, veremos cómo añadir un nuevo registro a la base de datos usando VB .NET código.

Añadir un nuevo registro

Añadir un nuevo registro es un poco más complejo. Primero, tienes que añadir un nuevo Rema al DataSet, y luego envía la nueva fila a la base de datos.

Pero el botón Add New Record de nuestro formulario es bastante simple. El único lo que hace es apagar los otros botones, y limpiar las cajas de texto, listo para una nueva entrada. Aquí está el código para el botón Add New Record :

btnCommit.Enabled = True btnAddNew.Enabled = False
btnUpdate.Enabled = False
btnDelete.Habilitado = Falso

txtNombreDePrimeraVerdadero.Claro()
txtSurname.Clear()

Así que tres botones se apagan cuando el botón Add New Record es …y se enciende uno. El botón que se enciende es el Commit Botón de cambios. La propiedad Enabled de btnCommit se establece en True . Pero, para que esto funcione, es necesario ponerla a False cuando se carga el formulario. Así que vuelve a tu formulario. Haz clic en btnCommit para seleccionarlo. A continuación, localiza el Habilitado Propiedad en el cuadro de propiedades. Ponerla en Falso . Cuando la forma se inicia, el botón se apagará.

El botón Borrar/Cancelar puede usarse para volver a encenderlo. Así que añade esto código de tu btnClear:

btnCommit.Enabled = False
btnAddNew.Enabled = True
btnUpdate.Enabled = True
btnDelete.Enabled = True

inc = 0
NavigateRecords()

Apagamos el botón Commit Changes , y los otros tres vuelven a su sitio. en. Las otras dos líneas sólo asegúrate de que mostramos el primer registro de nuevo, después de que se haga clic en el botón Cancelar. De lo contrario, los cuadros de texto estarán todos en blanco.

Para añadir un nuevo registro a la base de datos, usaremos el botón Commit Change s. Así que haz doble clic en tu btnCommit para acceder a su código. Añade lo siguiente:

Si inc inc; -1 Entonces

Dim cb As New OleDb.OleDbCommandBuilder(da)
Dim dsNewRow As DataRow

dsNewRow = ds.Tables(«AddressBook»).NewRow()

dsNewRow.Item(«Nombre») = txtNombre.Texto
dsNewRow.Item(«Apellido») = txtApellido.Texto

ds.Tablas(«Agenda»).Filas.Añadir(dsNuevaFila)

da.Update(ds, «AddressBook»)

MessageBox.Show(«Nuevo registro añadido a la base de datos»)

btnCommit.Enabled = False
btnAddNew.Enabled = True
btnUpdate.Enabled = True btnDelete.Enabled = True

Finalizar si

El código es algo más largo de lo habitual, pero lo revisaremos.

La primera línea es una declaración de «Si». Sólo estamos comprobando que hay un válido registro para añadir. Si no lo hay, la variable inc estará en menos 1. Dentro de de la declaración If, primero establecimos un Constructor de Comandos , como antes. La siguiente línea es esta:

Dim dsNewRow As DataRow

Si quieres añadir una nueva fila a tu DataSet, necesitas un objeto DataRow . Esta línea sólo establece una variable llamada dsNewRow . El tipo de variable es un DataRow.

Para crear el nuevo objeto DataRow, esta línea es la siguiente:

dsNewRow = ds.Tables(«AddressBook»).NewRow()

Sólo decimos: «Crear un objeto de nueva fila en el conjunto de datos de la agenda, y almacenar esto en la variable llamada dsNewRow.» Como puedes ver, NewRow() es un método de ds.Tablas . Usa este método para añadir filas a tu DataSet.

Los valores reales que queremos almacenar en las filas vienen de los cuadros de texto. Así que tenemos estas dos líneas:

dsNewRow.Item(«Nombre») = txtNombre.Texto
dsNewRow.Item(«Apellido») = txtApellido.Texto

El objeto dsNewRow que hemos creado tiene una propiedad llamada Item . Este es como la propiedad Item que usaste antes. Representa una columna en tu DataSet. Podríamos haber dicho esto en su lugar:

dsNewRow.Item(1) = txtNombre.Texto
dsNewRow.Item(2) = txtApellido.Texto

La propiedad Item está ahora usando el número de índice de las columnas del DataSet, en lugar de los nombres. Los resultados son los mismos, sin embargo: para almacenar nuevos valores en estas propiedades. Estamos almacenando el texto de los cuadros de texto en nuestra nueva fila.

Ahora sólo tenemos que llamar al Método que realmente añade la Fila al DataSet:

ds.Tablas(«Agenda»).Filas.Añadir(dsNuevaFila)

Para añadir la Fila, se utiliza el método Add de la propiedad Filas del DataSet. Entre los corchetes redondos, necesitas el nombre de tu DataRow (la variable dsNewRow , en nuestro caso).

Deberías saber lo que hace el resto del código. Aquí está la siguiente línea:

da.Update(ds, «AddressBook»)

De nuevo, sólo estamos usando el método Update del Adaptador de Datos, sólo como la última vez. El resto del código sólo muestra un cuadro de mensajes, y reinicia el botón.

Pero para añadir una nueva fila a un DataSet, aquí hay un resumen de lo que hay que hacer:

• Crear una variable DataRow
• Crea un objeto a partir de esta variable usando el método NewRow() de la propiedad del DataSet Tablas
• Asignar valores a los elementos de la nueva fila
• Utilice el método Add del DataSet para añadir la nueva fila