![]() |
Execute SQL File
Hi Leute
Hab ein Problem.... Ich will mit dieser Function
Delphi-Quellcode:
ein SQL File script abschießen, welches mir einen Table erstellt. Wenn ich das Script händisch ausführe (SQL Server Management Studio) funktioniert es.
function sqlfile(filename : string) : string;
begin if not fileexists(filename) then toolsst.exceptionst('SQL File not found!'); oTmpQry := TADOQuery.Create(nil); try try oTmpQry.Connection := Conn; oTmpQry.CommandTimeout := 10000; oTmpQry.LoadFromFile(filename); oTmpQry.Active := True; result := 'OK'; except on e : exception do begin result := e.Message; end; end; Finally oTmpQry.free; end; end; Folgendes bekomme ich retour:
Code:
Kann mir hier jemand helfen?
C:\>test.exe
[20120327] [13:55:44] [DEBUG] Checking if Table exist ... [20120327] [13:55:44] [DEBUG] Database connect [OK] [20120327] [13:55:44] [DEBUG] Table not found! Try to create ... Exception: CREATE TABLE SQL EXCEPTION: Das Recordset kann anhand der angegebene Quelle nicht erstellt werden. Die Quellendatei oder der Strom mu▀ Recordsetdaten im XML- oder ADTG-Format enthalten C:\> LG Steffen |
AW: Execute SQL File
Dann meinst du doch auch sicherlich
Delphi-Quellcode:
oTmpQry.SQL.LoadFromFile(filename);
Oder möchest du ein Recordset laden? |
AW: Execute SQL File
du hast recht... habe ich bereits probiert... aber dann bekomme ich folgendes zurück:
Code:
Irgendwer eine Idee?
[20120327] [14:25:55] [DEBUG] Checking if Table exist ...
[20120327] [14:25:55] [DEBUG] Database connect [OK] [20120327] [14:25:55] [DEBUG] Table not found! Try to create ... CREATE TABLE SQL EXCEPTION: CommandText gibt keine Ergebnismenge zur³ ck C:\> LG |
AW: Execute SQL File
Zitat:
Wenn das Script funktioniert, dann kommen Fehlermeldungen zurück? Das ist alles sehr obskur! Gruß K-H |
AW: Execute SQL File
Du hast keine Ergebnismenge. Du must das Script per Execute statt mit Active:=True ausführen!
|
AW: Execute SQL File
cool, mit ExecSQL hats funktioniert. Danke!
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 04:05 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz