Warum noch ein Access-Buch?
Für wen ist das Buch?
Jetzt bestellen
+ direkter Download des eBooks!
Nur EUR 59,95!
Fehler gefunden?
Bitte melden!
Wünsche an das Buch?
Her damit!
Was denken die Leser über dieses Buch?
Lesen Sie aktuelle Rezensionen!
Kapitel des noch nicht veröffentlichten Buchs zum Downloaden, Probelesen und Kommentieren
Beispieldatenbanken
Zusätzliches Material

Das Buch im HTML-Format

Für unbestimmte Zeit bieten Addison-Wesley und André Minhorst den kompletten Inhalt des Buchs als Download an. Schauen Sie rein und informieren Sie sich über den Inhalt! Und wenn Ihnen das Buch nützlich erscheint und Sie glauben, dass Sie etwas gelernt haben oder durch das Gelesene sogar etwas Zeit und somit Geld bei Ihrer Arbeit einsparen konnten, können Sie sich ja beim Autor und beim Verlag revanchieren - beispielsweise durch den Kauf dieses Buchs.

Am schönsten wäre es natürlich, wenn Sie das Buch direkt hier bestellen - Sie erhalten das Buch dann direkt vom Verlag, und der Autor und Verlag haben dann noch mehr davon, als wenn Sie es anderswo kaufen.

Danke für Ihr Interesse!

9.9.2 Bearbeiten eines Datensatzes

9.9.3 Löschen eines Datensatzes

Auch beim Löschen eines Datensatzes muss der zu löschende Datensatz zuvor ausgewählt werden. Ist der Datensatzzeiger auf dem gewünschten Datensatz positioniert, sorgt die Delete-Methode für die Entfernung dieses Datensatzes.

Public Sub DatensatzLoeschen()
    ...
    Set rst = db.OpenRecordset("tblMitarbeiter", dbOpenDynaset)

    With rst
        .FindFirst "Vorname = 'Hans' AND Nachname = 'Wurst'"
        If Not .NoMatch Then
            .Delete
        End If
    End With
    ...
End Sub

Listing 9.44: Löschen eines Datensatzes

Alternative zum Löschen eines Datensatzes

Das Löschen von Datensätzen lässt sich mit einer SQL-Aktionsabfrage in den meisten Fällen schneller und in jedem Fall durch weniger Codezeilen bewerkstelligen. Die SQL-Variante des obigen Codes sieht beispielsweise folgendermaßen aus:

Public Sub DatensatzLoeschenPerSQL()

    Dim db As DAO.Database
    Set db = CurrentDb

    db.Execute "DELETE FROM tblMitarbeiter " _
        & "WHERE Vorname = 'Hans' AND Nachname = 'Wurst'"

    Set db = Nothing

End Sub

Listing 9.45: Löschen eines Datensatzes per SQL-Aktionsabfrage

Nächster Abschnitt:

9.9.4 Umgang mit Attachments

© 2006-2008 André Minhorst Alle Rechte vorbehalten.