Ich möchte über VBA ein SQL-Update auf einer Oracle-DB mittels ODBC-Verbindung durchführen. Da ich noch nie damit gearbeitet habe, bin ich grad dabei, mir die Zähne auszubeißen und die letzten Haare zu verlieren...
Folgendes habe ich versucht:
Dim dbs As Database
Dim qdf As QueryDef
Set dbs = OpenDatabase("")
Set qdf = dbs.CreateQueryDef("")
With qdf
.Connect = "ODBC;DSN=DB;UID=abc;PWD=abc;APP=Microsoft® Query;DATABASE=LOGICAL;Network=DBMSSOCN"
.sql = "UPDATE Artikelstamm SET Auslauf = 1 WHERE Hauptgruppe != 'DIENSTLEISTUNG'"
.sql = "COMMIT"
End With
dbs.Close
Bekomme keine Fehlermeldung, es funkt aber auch nicht. Ich hoffe, es kann mir irgendwer helfen.
Vielen Dank
Alf