VBA: RecordSet.Edit Problem

[fisheye]

Hallo alle,

ich habe da ein Problem bei der Edit Funktion in einem Access Formular. Leider werden beim RecordSet.Edit nur die Inhalte in der Datenbank geändert, die bereits Daten enthielten. Wie kann man das Problem umgehen, so dass auch der Inhalt in die Tabellen geschrieben wird, wo noch nichts drinne stand? Kann man automatisch sagen, dass wenn kein Inhalt in der Tabelle ist, der Eintrag mit AddNew angelegt werden soll? Allerdings darf kein kompletter Datensatz angelegt werden, sondern halt nur das leere Feld ausgefüllt werden (z.B. Feld "Straße", wenn die Straße nicht angegeben ist)

So sieht der Code bei mir aus:

Private Sub F2Speichern_Click()

Dim db As Database

Dim rst As Recordset

Set db = CurrentDb

Set rst = db.OpenRecordset("tblPersonen", dbOpenDynaset)

rst.FindFirst "ID= " & ID.Value

rst.Edit

rst![sYSDAT] = Now()

rst![Titel] = F2Titel.Value

rst![Zusatz] = F2Zusatz.Value

rst.Update

rst.Close

End Sub

Wäre für Hilfe dankbar.

Schöne Grüße