Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi SQl Insert einer Textfile (https://www.delphipraxis.net/9545-sql-insert-einer-textfile.html)

subw00fer 29. Sep 2003 07:42


SQl Insert einer Textfile
 
Hallo!

Ich bekomme Daten mittels Texfile und möchte die Daten auf die DB(AS400) legen. Momentan lese ich zeilenweise und schreibe die gelsene und bearbeitete Zeile in die Datenbank. Die Datenmenge bewegt sich zwischen 80.000 und 300.000 Zeilen-> Zeitaufwendig, da bis zu 300.000 INSRET erfolgen.

Soviel ich weis gibt es INSERTS, die einmal geöffnet werden und dann nur mehr geschrieben wird. Leider finde ich nicht das passende INSERT für meine DB.

Hier vielleicht noch meine Logik:

Code:
procedure TForm5.Button7Click(Sender: TObject);
var TextString,:String;
begin
                          //DAtei öffnen
      while not eof(F) do
        begin
          //Zeile lesen
                          //Parameter verarbeiten und für insert vorbereiten
          try
            Form1.Q.Close;
            Form1.Q.SQL.Clear;
            Form1.Q.SQL.Add('Insert into tabelle (parameter) Values(parameter)');
            Form1.Q.ExecSQL;
          except
             //Fehlermeldung
          end;
        end;
                          //weiter Verarbeitungen
end;
Doch diese vielen Inserts verzögern das uploaden. Ich schreibe ca. 10 Sätze pro/sec.

Kann mir jemand weiterhelfen?

MrSpock 30. Sep 2003 06:45

Re: SQl Insert einer Textfile
 
Hallo subwOOfer,

hast du mal BatchMove ausprobiert?

subw00fer 30. Sep 2003 11:07

Re: SQl Insert einer Textfile
 
Servus!

Nein, BatchMove habe ich noch nicht ausprobiert. Doch BatchMove wird doch für Tabellen verwendet, oder? Ich habe die Daten in Form einer Datei. Oder funktioniert BatchMove auch mit Files?

MrSpock 30. Sep 2003 11:50

Re: SQl Insert einer Textfile
 
Hallo subwOOfer,

BatchMove funktioniert auch mit ASCII - Tabellen / Dateien in Form von CSV.

subw00fer 30. Sep 2003 15:13

Re: SQl Insert einer Textfile
 
Okey, dokey!

Muss ich mal ausprobieren. Danke im Voraus! :-D


Alle Zeitangaben in WEZ +1. Es ist jetzt 20:11 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