Datenbankenzeile zeilenweise kopieren

[Mitchl55]

Hallo,

da die Datenbanken mit zunehmenden Einträgen langsamer werden, habe ich zwei identische Datenbanken erstellt.

z.B.: Datenbank1.DB
Datenbank2.DB

Ich möchte jetzt einfach nur von Zeit zu Zeit die alten Datensätze von der ersten Datenbank in die zweite Datenbank kopieren und in Datenbank eins löschen um die Arbeitsgeschwindigkeit für mein Datenbank1 wieder zu erhöhen (beim Filtern etc.).

Ich würde das ganze so machen:

Delphi-Quellcode:

Do While Schleife Start // Alle Datensätze die älter als ein bestimmtes Datum sind.
// Zuweisung der Spalten
Table1.['Spalte1'] := Table2.['Spalte1'];
Table1.['Spalte2'] := Table2.['Spalte2'];
Table1.['Spalte3'] := Table2.['Spalte3'];
Table1.['Spalte3'] := Table2.['Spalte4'];

Table2.post;
Table1.delete;

Do While Schleife Ende //

Da ich nun aber mehrere Datenbanken habe und auch mehrere Spalten vorhanden sind, müßte ich jedesmal alle Spalten zuweisen, was ich als ziemlich läßtig empfinde und wodurch Fehler passieren können. Deshalb meine Frage: Kann ich nicht auch, bei identische Datenbanken, einfach einen Befehl benutzen der automatisch die Zeilen komplett in eine andere Datenbank kopiert!?

Danke & Gruß

Mitchl

[MrSpock]

Hallo Mitchl55,

du könntest du Komponente BatchMove verwenden, wobei du aber die Source noch filtern musst. Alternativ ginge auch ein SQL Statement mit dem Schlüsselwort INSERT.