Diese Funktion löscht einen Datensatz aus der Tabelle VORSICHT: Position im Recordset (z.B. rs.EOF) ist danach nicht definiert!
Function
SQL_Delete(ByVal rs As ADODB.Recordset) As Boolean
Public Function SQL_Delete(ByVal rs As ADODB.Recordset) As Boolean If rs.EOF = False Then rs.Delete FF_UpdateRecordset rs SQL_Delete = True Else SQL_Delete = False End If End Function