Über VBA Einträge in einer Mysql-Datenbank löschen
14.08.2003 11:53:37
carsten
ich würde gerne über Excel mit VBA Einträge aus einer mysql-Datenbank löschen. Verbindung läuft über ODBC.
Das füllen der DB klappt ohne Probleme, nur wenn ich anstatt des Inserts den Delete Befehl benutze, werden zwar die Einträge aus der DB gelöscht, danach wird aber der Laufzeitfehler 13 "Datentypen unverträglich" ausgeworfen.
Woran könnte das liegen??
Quelltext:
sql_delete = "DELETE from " & TAB_NAMEN(1) & " where job_id=" & job_id & ";"
MsgBox sql_delete
connstring = _
"ODBC;DSN=" & dsn & ";UID=" & user & ";PWD=" & pwd '& ";Database=meyer_db"
With ActiveSheet.QueryTables.Add(Connection:=connstring, _
Destination:=Range("CA1"), sql:=sql_delete)
.Refresh BackgroundQuery:=False
End With