With rst
 
    sql = "SELECT * FROM Region WHERE =  '?'
    .Open sql, db, adOpenStatic, adLockOptimist
 
    If .RecordCount = 0 Then .AddNew
 
    !PLZ = form_ausgang.txt_angabe_plz.Text
    !Ort = form_ausgang.txt_angabe_ort.Text
    .Update
    .Close
 
Set rst = Nothing
 
End With

"Nimm nie einen Menschen, wenn du eine Maschine daf?r nehmen kannst!"