Autowert neuer Datensätze ermitteln

Wenn Sie ein Abonnement des Magazins 'Access im Unternehmen' besitzen, können Sie sich anmelden und den kompletten Artikel lesen.
Anderenfalls können Sie das Abonnement hier im Shop erwerben.

Autowert neuer Datensätze ermitteln

Neue Datensätze legen Sie entweder mit der Methode AddNew/Update oder mit der Execute-Methode unter Angabe einer INSERT INTO-SQL-Anweisung an. Dieser Beitrag zeigt, wie Sie auf die Autowerte der neuen Einträge zugreifen.

Bei AddNew/Update können Sie vor Ausführen der Update-Methode den Wert des Autowertfeldes ermitteln. Nach dem Update wird der Datensatzzeiger auf einen anderen Datensatz verschoben, der neue Datensatz ist dann nicht mehr greifbar (s. Listing 1).

Public Sub NeuerDatensatzI()
     Dim db As DAO.Database
     Dim rst As DAO.Recordset
     Set db = CurrentDb
     Set rst = db.OpenRecordset("tblKategorien", dbOpenDynaset)
     rst.AddNew
     rst!Kategoriename = "Neue Kategorie"
     MsgBox rst!KategorieID
     rst.Update
     MsgBox rst!KategorieID
End Sub

Listing 1: Ermitteln der ID eines neuen Datensatzes, Version I

Dies war die Leseprobe dieses Artikels.
Melden Sie sich an, um auf den vollständigen Artikel zuzugreifen.

Bitte geben Sie die Zeichenfolge in das nachfolgende Textfeld ein

Die mit einem * markierten Felder sind Pflichtfelder.

Ich habe die Datenschutzbestimmungen zur Kenntnis genommen.