SQL Deletecommad wird nicht abgesetzt

MasterDS

Erfahrenes Mitglied
Hi!

Habe folgendes Problem:
Ich habe eine Funktion die ein Datatable und den Tabellennamen entgegen nimmt und die Datenbank via .Update(Datatable) aktualisiert. Funktioniert auch Prima. Nur mit dem Deletecommand will es nicht klappen. Bekomme aber keine Fehlermeldung. Es wird nur in der Datenbank nix gelöscht.

Hier der Code:

Code:
Shared Sub Datenbank_UPDATE(ByVal DT As DataTable, ByVal SQLTabelle As String)
        Dim ConnectionString As String = _
        "Database=" & My.Settings.dbName & ";Data Source=" & My.Settings.dbHost & ";User Id=" & My.Settings.dbUser & ";Password=" & My.Settings.dbPasswort
        Dim SQLConnection As New MySqlConnection(ConnectionString)
        Dim SQLAdapter As New MySqlDataAdapter("SELECT * FROM " & SQLTabelle, SQLConnection)
        Dim SQLStringBuilder As New MySqlCommandBuilder(SQLAdapter)

        With SQLAdapter
            .UpdateCommand = SQLStringBuilder.GetUpdateCommand
            .InsertCommand = SQLStringBuilder.GetInsertCommand
            .DeleteCommand = SQLStringBuilder.GetDeleteCommand
            Debug.WriteLine(.DeleteCommand.CommandText)

        End With

        Try
            If DT.Rows.Count > 0 Then
                SQLConnection.Open()
                SQLAdapter.Update(DT) 'Eigentlicher Updatevorgang

                'Rückmeldung an Hauptform
                frmHauptfenster.lblSTATUS.Text = "Änderungen Erfolgreich übernommen!"
                My.Computer.Audio.PlaySystemSound(Media.SystemSounds.Asterisk)
            End If
        Catch ex As Exception
            MsgBox("Die Datenbank konnte nicht aktualisiert werden." & vbNewLine & vbNewLine _
           & "Connectiontext: " & vbNewLine & ConnectionString & vbNewLine & vbNewLine _
           & "Befehlstext: " & vbNewLine & SQLStringBuilder.GetUpdateCommand.ToString, MsgBoxStyle.Critical, "Verbindungsfehler")

        Finally
            SQLStringBuilder.Dispose()
            SQLAdapter.Dispose()
            SQLConnection.Close()
        End Try    
    End Sub

Jemand eine Idee, warum ausgerechnet der Deletecommand nicht klappt? Wie ihr seht, hab ich mir den SQL String mal via Debug.Writeline ausgeben lassen, aber der sieht eigentlich ganz gut aus.

Danke schon mal.
 
Zurück