Se aplica a: Access 2013 | Access 2016
Esta es la sintaxis básica del método AddNew : recordset.AddNewFieldList,Values
Los argumentos FieldList y Values son opcionales. FieldList puede ser un nombre único, o bien, una matriz de nombres o posiciones ordinales de los campos en el nuevo registro.
El argumento Values puede ser un valor único, o bien, una matriz de valores para los campos en el nuevo registro.
Normalmente, cuando quiera agregar un único registro, llamará al método AddNew sin argumentos. En concreto, llamará a AddNew, establecerá el valor de cada campo del nuevo registro y, a continuación, llamará a Update o UpdateBatch. Para asegurarse de que su conjunto de registros admite la incorporación de nuevos registros, utilice la propiedad Supports con la constante enumerada adAddNew.
El código siguiente utiliza esta técnica para agregar un nuevo transportista al conjunto de registros de ejemplo. SQL Server proporciona automáticamente el valor del campo IDCompañíaEnvíos (ShipperID), de modo que el código no intenta proporcionar un valor de campo para los nuevos registros.
'BeginAddNew1.1
If objRs1.Supports(adAddNew) Then
With objRs1
.AddNew
.Fields("CompanyName") = "Sample Shipper"
.Fields("Phone") = "(931) 555-6334"
.Update
End With
End If
'EndAddNew1.1
Dado que este código utiliza un conjunto de registros desconectado con un cursor de cliente en modo de proceso por lotes, debe volver a conectar el conjunto de registros al origen de datos con un nuevo objeto Connection para poder llamar al método UpdateBatch para enviar cambios a la base de datos. Esto se puede hacer fácilmente con la nueva función GetNewConnection.
'BeginAddNew1.2
'Re-establish a Connection and update
Set objRs1.ActiveConnection = GetNewConnection
objRs1.UpdateBatch
'EndAddNew1.2
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.