Freigeben über


Hinzufügen von Datensätzen mithilfe von AddNew

Gilt für: Access 2013 | Access 2016

Dies ist die grundlegende Syntax der AddNew-Methode : recordset.AddNewFieldList,Values

Die Argumente FieldList und Values sind optional. FieldList ist entweder ein einzelner Name oder ein Array von Namen oder Positionen der Felder im neuen Datensatz.

Das Argument Values ist entweder ein einzelner Wert oder ein Array von Werten für die Felder im neuen Datensatz.

Wenn Sie einen einzelnen Datensatz hinzufügen möchten, rufen Sie in der Regel die AddNew-Methode ohne Argumente auf. Insbesondere rufen Sie AddNew auf, legen den Wert jedes Felds im neuen Datensatz fest und rufen dann Update und/oder UpdateBatch auf. Wenn Sie die Supports-Eigenschaft zusammen mit der aufgezählten Konstante adAddNew verwenden, können Sie sicherstellen, dass das Recordset-Objekt das Hinzufügen neuer Datensätze unterstützt.

Im folgenden Code wird diese Technik verwendet, um dem Recordset-Beispiel einen neuen Versender hinzuzufügen. Der Wert des ShipperID-Felds wird automatisch von SQL Server bereitgestellt, sodass der Code nicht versucht, einen Feldwert für die neuen Datensätze anzugeben.

'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 

Da in diesem Code ein getrenntes Recordset-Objekt mit einem clientseitigen Cursor im Batchmodus verwendet wird, müssen Sie das Recordset mit einem neuen Connection-Objekt erneut mit der Datenquelle verbinden, bevor Sie die UpdateBatch-Methode aufrufen können, um Änderungen an der Datenbank zu veröffentlichen. Dies kann ganz einfach mithilfe der neuen Funktion GetNewConnection erreicht werden.

'BeginAddNew1.2 
 'Re-establish a Connection and update 
 Set objRs1.ActiveConnection = GetNewConnection 
 objRs1.UpdateBatch 
'EndAddNew1.2 

Siehe auch

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.