Compartir a través de

Adición de varios campos

  • Artículo

Se aplica a: Access 2013, Office 2013

En ocasiones, podría resultar más eficaz pasar una matriz de campos y sus correspondientes valores al método AddNew que establecer Value varias veces para cada nuevo campo. Si FieldList es una matriz, Values también debe ser una matriz con el mismo número de elementos; de lo contrario, se produce un error. El orden de los nombres de campo debe coincidir con el orden de los valores de campo en cada matriz. El código siguiente pasa una matriz de campos y una matriz de valores al método AddNew.

 
'BeginAddNew2 
 Dim avarFldNames As Variant 
 Dim avarFldValues As Variant 
 
 avarFldNames = Array("CompanyName", "Phone") 
 avarFldValues = Array("Sample Shipper 2", "(931) 555-6334") 
 
 If objRs1.Supports(adAddNew) Then 
 objRs1.AddNew avarFldNames, avarFldValues 
 End If 
 
 'Re-establish a Connection and update 
 Set objRs1.ActiveConnection = GetNewConnection 
 objRs1.UpdateBatch 
'EndAddNew2