AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Datenbanken Delphi [ADO und MS SQL-Server 2005/2008] Ausführen von Scripts
Thema durchsuchen
Ansicht
Themen-Optionen

[ADO und MS SQL-Server 2005/2008] Ausführen von Scripts

Ein Thema von tkoenig · begonnen am 16. Mär 2010 · letzter Beitrag vom 17. Mär 2010
Antwort Antwort
Seite 1 von 2  1 2      
tkoenig

Registriert seit: 16. Mär 2010
Ort: Dresden
19 Beiträge
 
Delphi XE7 Professional
 
#1

[ADO und MS SQL-Server 2005/2008] Ausführen von Scripts

  Alt 16. Mär 2010, 17:10
Datenbank: SQL Server • Version: 2005/2008 • Zugriff über: ADO
Mahlzeit zusammen.

Ich habe ein Problem und bin langsam am verzweifeln, seit einer Woche durchforste ich jetzt schon das Internet, habe aber bisher keine zufriedenstellende Antwort zu meinem Problem gefunden.

Mein Problem ist folgendes:
Ich muss für ein Projekt (unter anderem) .sql-Dateien in mein Programm einlesen und diese an den SQL-Server übermitteln, der diese dann verarbeitet (Stichwort Query Analyzer). Die Scripts selbst können mehrere hundert Zeilen lang sein und sollten theoretisch keine Ergebnismenge zurückliefern.
Es soll ein Copy-Paste-Programm werden, deshalb benutze ich ADO um keine zusätzlichen Treiber oder Software wie die BDE etc. auf den Zielrechnern installieren zu müssen.

Ich verwende jetzt also eine TADOConnection-Komponente, Verbindung zum Server läuft super, einfache Scripts lassen sich auch ohne Fehler übertragen, allerdings kommt es bei größeren Transaktionen regelmäßig zu einer Exception á la "Syntaxfehler in der Nähe von "GO" / "Select" etc.". Scheinbar prüft also die ADOConnection die Syntax der Abfrage und blockiert diese unter Umständen. Ich weiß allerdings 100%ig, dass die SQL-Scripts korrekt sind, sie werden von Query Analyzer ohne Mucken verarbeitet.
Daher nun meine Frage: Kann ich der ADOConnection irgendwie mitteilen, dass ihr der Syntax meines Scripts egal zu sein hat?

Bis jetzt sieht der Code folgendermaßen aus:
Delphi-Quellcode:
function executeSQL(filename : string; ADO: TADOConnection) : boolean;
var i : integer;
    sql : widestring;
    success : boolean;
begin
  success := false;
  sql := CreateSQLSequence(filename);
  with ADO do
  begin
    if not Connected then Open;
    try
      BeginTrans;
      Execute(sql,i,[eoExecuteNoRecords]);
      success := true;
    except
      on e: Exception do
        success := false;
    end; // try .. except
    if success then
      CommitTrans
    else
    begin
      RollbackTrans;
      showmessage('Bei der Verarbeitung ist ein Fehler aufgetreten');
    end; // if .. else
    Close;
  end; // with ADO do
end; // executeSQL
Vielen Dank schonmal im Voraus für eure Hilfe.

Greetings, tkoenig
  Mit Zitat antworten Zitat
omata

Registriert seit: 26. Aug 2004
Ort: Nebel auf Amrum
3.154 Beiträge
 
Delphi 7 Enterprise
 
#2

Re: [ADO und MS SQL-Server 2005/2008] Ausführen von Scripts

  Alt 17. Mär 2010, 01:58
Vielleicht so...
Delphi-Quellcode:
function executeSQL(filename : string; ADO: TADOConnection) : boolean;
var sql : widestring;
begin
  sql := CreateSQLSequence(filename);
  try
    if not ADO.Connected then
      ADO.Open;
    ADO.BeginTrans;
    ADO.Execute('execute(' + QuotedStr(sql) + ')');
    ADO.CommitTrans;
    ADO.Close;
    Result:=true;
  except
    on e: Exception do begin
      ADO.RollbackTrans;
      Result:=false;
      raise Exception.Create(
        'Bei der Verarbeitung ist folgender Fehler aufgetreten: ' + e.message
      );
    end;
  end;
end;
  Mit Zitat antworten Zitat
tkoenig

Registriert seit: 16. Mär 2010
Ort: Dresden
19 Beiträge
 
Delphi XE7 Professional
 
#3

Re: [ADO und MS SQL-Server 2005/2008] Ausführen von Scripts

  Alt 17. Mär 2010, 09:06
Erstmal danke für die Antwort, leider bleiben die Fehler die gleichen..

Meldung: Falsche Syntax in der Nähe von "GO". Die Syntaxprüfung ist also weiterhin aktiv...
  Mit Zitat antworten Zitat
Bbommel

Registriert seit: 27. Jun 2007
Ort: Köln
655 Beiträge
 
Delphi 12 Athens
 
#4

Re: [ADO und MS SQL-Server 2005/2008] Ausführen von Scripts

  Alt 17. Mär 2010, 09:24
Wie groß sind denn diese SQL-Dateien, bei denen das System anfängt rumzuzicken? Ich hatte vor einigen Tagen einen ähnlichen Effekt, allerdings nicht innerhalb von Delphi/ADO, sondern zunächst im Management Studio, aber dann auch beim etwas puristischeren "sqlcmd.exe". Ich hatte da SQL-Dateien, die so ~400 MB groß waren und die Fehlermeldungen, die da kamen, sahen deinen sehr ähnlich. Insofern wäre ich mir jetzt gar nicht mal so sicher, dass die ADO-Komponente die schuldige ist und eine Syntaxprüfung durchführt.

Ich hab es mir dann einfach gemacht und hab mir ein Programm geschrieben, das mir meine große SQL-Datei in viele kleine zerlegt hat, die ich dann nacheinander starte... dann geht es. Alternativ wäre mir in meinem Fall (in der Datei stehen sehr viele INSERTs) noch eingefallen, das alles selbst intern auszuwerten und "sauber" als Abfrage mit Parametern an den Server zu übertragen. Ersteres war dann aber der viel leichtere Weg.

Bis denn
Bommel
  Mit Zitat antworten Zitat
tkoenig

Registriert seit: 16. Mär 2010
Ort: Dresden
19 Beiträge
 
Delphi XE7 Professional
 
#5

Re: [ADO und MS SQL-Server 2005/2008] Ausführen von Scripts

  Alt 17. Mär 2010, 09:35
Zitat von tkoenig:
Ich weiß allerdings 100%ig, dass die SQL-Scripts korrekt sind, sie werden von Query Analyzer ohne Mucken verarbeitet.
Das management Studio nimmt die Befehle wie gesagt ohne Probleme an, ist alles getestet. Meine Test-Datei ist dagegen eher klein (~10 KB), sehr viel größer werden die Dateien in Zukunft wohl auch nicht werden. Ich habe eher den Verdacht, dass ADO nicht mit mehreren Befehlen innerhalb einer Transaction klarkommt.

Die Option Datei selbst auswerten gefällt mir nicht so gut.. In einem 900 KB-Tool, das lediglich eine Datei an den Server sendet und ein paar andere Aufräumaufgaben übernimmt, wollte ich jetzt nicht unbedingt einen hochwertigen SQL-Parser einbauen, das würde den Rahmen dann doch sprengen

MfG tkoenig
  Mit Zitat antworten Zitat
nahpets
(Gast)

n/a Beiträge
 
#6

Re: [ADO und MS SQL-Server 2005/2008] Ausführen von Scripts

  Alt 17. Mär 2010, 09:42
Hallo,

die Syntaxprüfung dürfte von der Datenbank kommen.

Kann mir nicht vorstellen, dass die ADO-Connection für quasi jeden beliebigen Datenbanktyp vorab eine Syntaxprüfung durchführen kann.

Zumindest die Fehlermeldung Syntaxfehler in der Nähe von ist absolut typisch für den SQL-Server, die anderen, von mir bis dato genutzten Datenbanken, geben etwas präzisere Fehlermeldungen aus.

Dir bleibt hier (vermutlich) nichts anderes übrig, als Dir die Dateiinhalte zu nehmen und statementweise zu testen, d. h.:
zuerst das erste Statement, dann das erste und das zweite, dann das erste, das zweite und das dritte, bis Du das Script auf diese Weise wieder vollständig zusammengebaut hast, bzw. auf den ersten Fehler stößt.

Manchmal hilft zur Fehlerkorrektur ein zusätzliches Semikolon oder auch mal eins weglassen, eine zusätzliche Leerzeile zwischen einzelnen Statements...

Auch die Menge der Hochkommata sollte überprüft werden, zumindest, wenn sie irgendwo verschachtelt vorkommen.

Der Hinweis von Bommel ist nicht zu vernachlässigen: Kannst Du mit sql = widestring beliebig große Zeichenfolgen "übermitteln" oder gibt es da eine Grenze.
Lies zum Test Deine Dateien in sql ein und schreibe sql in eine neue Datei. Alte und neue Datei müssen identisch sein, wenn nicht, geht da was verloren und Du hast den "Übeltäter".

Unvollständige Statements passen sehr gut zu Deiner Fehlermeldung.

Kannst Du mit Execute(sql,i,[eoExecuteNoRecords]); beliebiggroße Statements übergeben oder hat diese Methode eventuell bezüglich der Größe der Zeichenfolge eine Begrenzung?

Auch Dein Hinweis
Zitat:
Ich habe eher den Verdacht, dass ADO nicht mit mehreren Befehlen innerhalb einer Transaction klarkommt
geht in die richtige Richtung, hierbei gilt die Einschränkung aber nicht in Bezug auf Transaktion sondern auf mehrere Befehle.

Es gibt Datenbanken, denen kann man per Query und ExecSQL mehrere Befehle "in einem Rutsch" übergeben, also Query.SQL enthält hier mehrere Befehle. Dies funktioniert allerdings nicht bei allen Datenbanken.

Für Deine eigentlich überschaubare Aufgabenstellung hast Du hier leider deutlich zuviele "Stolpersteine". Hoffe, Du findest mit unseren Hinweisen eine einfache Lösung.
  Mit Zitat antworten Zitat
Bbommel

Registriert seit: 27. Jun 2007
Ort: Köln
655 Beiträge
 
Delphi 12 Athens
 
#7

Re: [ADO und MS SQL-Server 2005/2008] Ausführen von Scripts

  Alt 17. Mär 2010, 10:04
Hm, okay, dann liegt der Fall wohl doch anders als bei mir. Spontan würde mir dann nur die etwas "eklige" Lösung einfallen, dass du über ein ShellExecute das "sqlcmd" mit der entsprechenden SQL-Datei aufrufst. Vielleicht klappt es ja dann ohne Fehler (kannst du ja auch erst mal "zu Fuß" testen).

Bis denn
Bommel
  Mit Zitat antworten Zitat
shmia

Registriert seit: 2. Mär 2004
5.508 Beiträge
 
Delphi 5 Professional
 
#8

Re: [ADO und MS SQL-Server 2005/2008] Ausführen von Scripts

  Alt 17. Mär 2010, 15:14
Dieses "GO" ist kein Befehl, der von der Treiberschicht ADO->OLEDB->SQL-Server verstanden wird.
Vermutung:
Die MS Tools wie Query Analyser, Enterprise Manager, SQL Server Management Studio sammeln die SQL-Befehle in einer Liste, bis "GO" angetroffen wird.
Dann wird die Liste der Befehle auf einen Rutsch an den SQL-Server gesendet.
Der Befehl "GO" selbst wird nicht gesendet.
Andreas
  Mit Zitat antworten Zitat
tkoenig

Registriert seit: 16. Mär 2010
Ort: Dresden
19 Beiträge
 
Delphi XE7 Professional
 
#9

Re: [ADO und MS SQL-Server 2005/2008] Ausführen von Scripts

  Alt 17. Mär 2010, 15:27
Zu nahpets: Danke, dein Beitrag hat mir erstmal ein wenig zu denken gegeben, ich bin alles mal der Reihe nach durchgegangen.
Die Datei-Inhalte sequenzweise zu prüfen hat mich nicht weitergebracht. Sobald das erste GO auftritt (Zeile 2 ), kommt selbige Fehlermeldung wieder. Wie gesagt, ich denke nicht, dass die sql-Datei Fehler entählt, da der Query-Analyzer des Management Studios alles ohne Fehler abarbeitet.

"sql" als Widestring hat bei mir die komplette Datei as is übernommen und auch komplett zurückgegeben, am widestring liegt es also auch nicht. Die Execute-Prozedur erwartet ebenfalls einen widestring als SQL-Befehl, daher gehe ich davon aus, dass eine Beschränkung auch darin nicht liegt.


Zu Bommel: Das ist eine gute Idee, aber leider nicht anwendbar, erstens aus Sicherheitsgründen, da das Passwort für den SQL-Server-Entwickleraccount (Adminrechte ) im Klartext an sqlcmd übergeben werden muss und zweitens weil dieses Programm auch von Clients auf einen SQL-Server im Netzwerk angewandt werden soll. Auf den Clients ist der SQL-Server und somit auch der sqlcmd-Dienst üblicherweise nicht installiert...


@shmia: Also bleibt mir nichts anderes übrig als einen Parser zu schreiben, der erstmal auf das Wort GO reagiert und die Datei dann sequentiell übermittelt? Oder sollte ich einen anderen Treiber als SQLOLEDB nehmen?


Greetings
  Mit Zitat antworten Zitat
Bbommel

Registriert seit: 27. Jun 2007
Ort: Köln
655 Beiträge
 
Delphi 12 Athens
 
#10

Re: [ADO und MS SQL-Server 2005/2008] Ausführen von Scripts

  Alt 17. Mär 2010, 15:44
Hallo,

guter Hinweis von shmia. Dass "GO" kein gültiger T-SQL-Befehl ist steht auch im MSDN. Konsequenterweise wird dir also auch kein anderer Treiber weiterhelfen, weil der Server das "GO" schlicht nicht verarbeiten kann (es sei denn, du findest einen Treiber, der das dann wiederum selbst abfängt).

Letztlich wirst du wohl um ein bisschen Porgrammieren nicht drumrum kommen: Entweder du hast Glück und das "GO" ist eigentlich total überflüssig (hatte ich schon bei ein paar Fällen - ich muss zugeben, dass ich mich damals immer nur über die Fehler gewundert habe und erst jetzt durch deinen Thread auf die Ursache aufmerksam geworden bin), dann kannst du es ja einfach aus dem String rausschmeißen. Oder es ist nicht überflüssig, dann musst du halt den SQL-Befehl immer da, wo ein "GO" kommt, abschneiden und absenden. Ist aber doch eigentlich beides überschaubar.

Bis denn
Bommel
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 1 von 2  1 2      


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 12:10 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz