Der
Query-Analyser führt mehrere Befehle nacheinander aus. Das geht so aber nicht aus Delphi oder VBA heraus. Dort kann immer nur ein Befehl mit Execute ausgeführt werden. Alternativ kannst du ja mal versuchen aus den vielen Einzelbefehlen einen Befehl zumachen, indem du alles in ein
SQL-Execute packst...
SQL = "EXECUTE('" & Replace(SQL, "'", "''") & "')"