Änderungen im Recordset werden nicht in die Datenbank geschrieben

[Markus]

Moin,
ich habe eine Access 2000 DB mittels ADO connectet und habe das
Recordset sortiert nach einer Spalte.
Wenn ich mir den Inhalt des RS in einem DataGrid anzeigen lasse, ist
die Sortierung korrekt. Diese Änderungen werden aber nicht in die
Datenbank übernommen, weder mit rs.update noch mit rs.updatebatch.

Anbei mein Code für die Connection:
Set db = New ADODB.Connection
Set rs = New ADODB.Recordset
With CommonDialog1
.DialogTitle = "Wählen Sie die Datenbank aus!"
.CancelError = True
.Filter = "Jet Datenbank (*.mdb)|*.mdb"
.ShowOpen
strg_dateiname = .FileName
End With
With db
.Provider = "Microsoft Jet 4.0 OLE DB Provider"
.ConnectionString = "Data Source=" & strg_dateiname
.Open
End With
With rs
.ActiveConnection = db
.CursorLocation = adUseClient
.LockType = adLockBatchOptimistic
.CursorType = adOpenKeyset
.Source = "SELECT * FROM Tabelle1"
.Open
End With

und für die Sortierung:
rs.Sort = "Feld14 asc"
rs.UpdateBatch
rs.Close
db.Close
Set rs = Nothing
Set db = Nothing

Für Eure Hilfe wäre ich sehr dankbar.

MfG Markus