Thema: Delphi insert per schleife

Einzelnen Beitrag anzeigen

Sauerkrautpoet

Registriert seit: 18. Jul 2006
Ort: Leipzig
20 Beiträge
 
#1

insert per schleife

  Alt 28. Aug 2006, 17:31
Datenbank: MySQL / FB • Version: 5.x • Zugriff über: ZEOS / ibo
hallo!
ich lade ein formular, bevor dies angezeigt wird, sollen daten von einer MYSQL tabelle in eine FB tab kopiert werden. also habe ich:

Delphi-Quellcode:
procedure onshow()
begin

   mysql_query_copy:=true; //sql code ist bereits vorhanden, kann also aktiv geschalten werden,wählt nur die relevanten daten mit nem select aus
   recordcount:=0;
   tmp:=iboqry_copy.sql.text;
    
    while NOT mysql_query_copy.EOF do
     begin
        recordcount++;
        iboqry_copy.param[0].asinteger:=mysql_query_copy.fieldvalue['irgendwas'];
          //gefüllt werden noch viele andere parameter

        iboqry_copy.execsql; //ibo_sql-insert ausführen
        mysql_query_copy.next //nächsten Datensatz anwählen
        iboqry_copy.sql.text:=i; //ursprünglichen sqlinsert wiederherstellen
      end;
     mysql_query_copy.active:=false;
     iboqry_showcopydata.active:=true; //abfrage zum anzeigen der kopierten daten aktivieren
end;

das ding ist jetzt: wenn ich das query showcopydata aktiviere(gehört zu einer grid) spuckt mir das ding wesentlich mehr datensätze aus wie ich egtl eingefügt hatte, lets say: copy:3 DS, angezeigt werden 18.
ich dachte erst, ich schleppe alten sqltext mit und habe dann den urspünglichen sql-insert immer wieder zurückgesetzt...bringt nix...
wenn man sich recordcount ausgeben lässt, wurden auch nur (zb) 3 durchläufe absolviert, dennoch besteht das -evolutionsbiologisch gesehen äußerst effektive-ergebnis von 18datensätzen...
wäre toll wenn jmd einen tipp hätte
  Mit Zitat antworten Zitat