Hi,
trotz zahlreicher Quellen, vom Referenzhandbuch angefangen, bis zum Stöbern div. Foren und einigem Zeitaufwand den Fehler über Try and Error zu ermitteln, gelang es mir nicht, den Fehler zu ermitteln.
Es gibt mir keinen Fehler aus und bereinigte mir auch jene Datensätze nicht, die vor dem Referenzdatum nDatum liegen.
Es ist eine von Access imigrierte Tabelle(MyISAM) mit dem Datentyp DATE.
Was habe ich hier falsch gemacht? Ich habe nicht nur den Operator < umgedreht (hätte ja sein können, dass ich falsch liege) und ich habe auch nDatum in '" & nDatum & "' eingeschlossen. Alles ohne Ergebnis.
Meine zweite Frage wäre, ob der SqlCommand in eine Schleife gelegt werden muss?
Ich bin wirklich am Verzweifeln.
Grüße
trotz zahlreicher Quellen, vom Referenzhandbuch angefangen, bis zum Stöbern div. Foren und einigem Zeitaufwand den Fehler über Try and Error zu ermitteln, gelang es mir nicht, den Fehler zu ermitteln.
Code:
Dim nDatum As Date nDatum = CDate(txtDate.Text) Try myconn.Open() Dim com As New MySqlCommand("SELECT * FROM treffer ORDER BY datum ASC", myconn) Dim da As New MySqlDataAdapter(com) Dim ds As New DataSet() da.Fill(ds, "treffer") Dim dt As DataTable = ds.Tables("treffer") Dim cb As New MySqlCommandBuilder(da) Dim row As DataRow For Each row In dt.Rows Dim command As New MySqlCommand("DELETE FROM treffer WHERE DATE_SUB(nDatum, INTERVAL 1 MONTH)< Datum", myconn) Next da.Update(ds, "treffer") Catch ex As Exception MessageBox.Show(ex.Message, "Fehler! Datenbereinigung 'treffer' ist fehlgeschlagen!") Finally myconn.Close() End Try
Es ist eine von Access imigrierte Tabelle(MyISAM) mit dem Datentyp DATE.
Was habe ich hier falsch gemacht? Ich habe nicht nur den Operator < umgedreht (hätte ja sein können, dass ich falsch liege) und ich habe auch nDatum in '" & nDatum & "' eingeschlossen. Alles ohne Ergebnis.
Meine zweite Frage wäre, ob der SqlCommand in eine Schleife gelegt werden muss?
Ich bin wirklich am Verzweifeln.
Grüße
Comment