Agregar registros mediante el método AddNew

Esta es la sintaxis básica del método AddNew:

conjunto de registros. AgregarNuevo ListaDeCampos, Valores

Los argumentos FieldList y Values son opcionales. FieldList es un nombre único o una matriz de nombres o posiciones ordinales de los campos del nuevo registro.

El argumento Values es un valor único o una matriz de valores para los campos del nuevo registro.

Normalmente, cuando piensa agregar un único registro, llamará al método AddNew sin argumentos. En concreto, llame a AddNew; establezca el valor de cada campo del nuevo registro; y después llame a Update o UpdateBatch, o a ambos. Puede confirmar que su recordset admite la adición de nuevos registros mediante la propiedad Supports con la constante enumerada adAddNew.

El código siguiente usa esta técnica para agregar un nuevo shipper al recordset de ejemplo. SQL Server proporciona automáticamente el valor del campo ShipperID. Por lo tanto, el código no intenta proporcionar un valor de campo para los nuevos registros.

'BeginAddNew1.1
If objRs.Supports(adAddNew) Then
    With objRs
        .AddNew
        .Fields("CompanyName") = "Sample Shipper"
        .Fields("Phone") = "(931) 555-6334"
        .Update
    End With
End If
'EndAddNew1.1

Observaciones

Dado que este código usa un Recordset desconectado con un cursor del lado del cliente en modo por lotes, debe volver a conectar el Recordset al origen de datos con un nuevo objeto Connection antes de poder llamar al método UpdateBatch para publicar cambios en la base de datos. Esto se realiza fácilmente mediante la nueva función GetNewConnection.