Was mache ich falsch? Firebird rattert wie irre auf der HDD

[Gecko]

Danke mkinzler, das funzt :-) :dp:

Jetzt brauch ich nur noch kurz Hilfe wegen der Implementierung in Delphi
Habe das jetzt so:

Delphi-Quellcode:

storedproc.StoredProcName:='SP_SPAM_IU';
zconnection1.StartTransaction;

for I := 0 to sl.Count-1 do begin

storedproc.ParamByName('WORD').AsString:=sl.Strings[i];
storedproc.ExecProc;

end;

zconnection1.Commit;

Wenn ich das das erste mal ausführe, passiert nichts...Beim Zweiten mal kommt der Fehler: StoredProc Parameter 'WORD' nicht gefunden.

[mkinzler]

In diesem fall kannst du auch eine normale abfrgae verwenden:

SQL-Code:

select * from SP_SPAM_IU ( <Param>);

[Gecko]

Danke, für sich geht das ,einmal muss ich aber noch nerven:

Das ganze will nicht so ganz mit meiner Transaktion zusammen, es wird immer nur der allererste übergebene Begriff in die SPAM-DB geschrieben,
also der für i=0..welchen grund hat das?

Delphi-Quellcode:

zconnection1.StartTransaction;
qrsecond.SQL.Text:='select * from SP_SPAM_IU (:WORD)';

for I := 0 to sl.Count-1 do begin

qrsecond.ParamByName('WORD').AsString:=sl.Strings[i];
qrsecond.Open;

end;
zconnection1.Commit;

[mkinzler]

Nimm statt .Open .ExecSQL, da du ja auf den Rückgabewert nicht zugreifst.

[Gecko]

Zitat:

Zitat von mkinzler

Nimm statt .Open .ExecSQL, da du ja auf den Rückgabewert nicht zugreifst.

Das hatte ich schon probiert. Da passiert dann aber schlechtweg garnichts.

[hoika]

>> sl.Strings[i];

Übergibst du überhaupt alle Texte ?


Heiko

[Gecko]

Zitat:

Zitat von hoika

>> sl.Strings[i];

Übergibst du überhaupt alle Texte ?


Heiko

Ja, also mit nem normalen Insert gehts

[hoika]

Hallo,

die SP ist in Ordnung (tested by myself),
beim Aufruf per ExecProc könnte man allerdings das Suspend weglassen.

Hast du mal in der Tabelle selbst nachgesehen,
ob die richtigen Werte drinstehen ?

Und schau dir mal an, ob die SP auch wirklich so
drinsteht wie hier gezeigt.
Viell. hast du ja die SP nicht richtig geändert?


Heiko

[Gecko]

Hallo,

Delphi-Quellcode:

for I := 0 to sl.Count-1 do begin
qrsecond.SQL.Text:='select * from SP_SPAM_IU (:WORD)';
qrsecond.ParamByName('WORD').AsString:=sl.Strings[i];
qrsecond.Open;
end;
zconnection1.Disconnect;

hiermit funktioniert es. An zwei Dingen bin ich jedoch noch am rätseln:

Es geht nicht ohne das Disconnect! Die Daten sind erst nach dem Disconnecten in der DB, was mich sehr stört. Ich will ja nicht dauernd re-connecten.
Weiss jemand warum?

Das zweite was mich stört wäre das es eben keine transaktion ist und firebird bei vielen einträgen wieder auf der HDD rattern wird
Ich hatte ja oben schon einen Transaktionscode gepostet, mit dem wird aber immernur der alle erste eintrag in die DB gepostet :(

[mkinzler]

Das ist ein Problem der Transaktionssteuerung von ZEOS.