Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
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
- Access-Entwicklerforum
- Hilfe mit Access unter support.office.com
- Hilfe mit Access unter answers.microsoft.com
- Access-Foren zu UtterAccess
- Entwickler- und VBA-Programmierung (FMS)
- Access-Beiträge zu StackOverflow
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.