Tabellenabfrage in eine neue Tabelle kopieren

[harald71]

Hallo an alle,

ich hab folgendes Problem. Ich muss meine Anwendung von BDE auf ADS umstellen. Bisher hab ich ein batchmove verwendet, um Daten in eine Tabelle zu verschieben. Jetzt muss ich das ganze anders lösen, da batchmove nicht unterstützt wird.

Ich hab eine Userform, auf den man ein Datumsbereich wählen kann. Über eine Sql-Abfrage filter ich die Daten aus: Select n1, n2, n3 from test where Datum >= von. Jetzt möchte ich eine neue Tabelle erstellen, die oben ermittelten Daten vom Select-Befehl aufnimmt. Leider weiß ich nicht so recht, wie ich es machen soll. Ich hab leider noch keinerlei Ahnung über die Arbeit mit SQL-Querries.

Für schnelle Hilfe wäre ich sehr dankbar.

[Robert_G]

Am einfachsten wäre es so:

SQL-Code:

CREATE TABLE NewTest As
  SELECT n1, n2, n3
  FROM  test
  WHERE Datum >= :iVonDT

In Delphi sieht das dann so aus:

Delphi-Quellcode:

  Query.Close;
  Query.SQL.Text := 
    'CREATE TABLE NewTest As' + #10 +
    '  SELECT n1, n2, n3' + #10 +
    '  FROM  test' + #10 +
    '  WHERE Datum >= :iVonDT';
  Query.Prepare;
  Query.ParamByName('iVonDT').AsDate := DeinDatum;
  Query.ExecSQL;

[harald71]

Danke für die schnelle Antwort,

leider bin ich gerade nicht am AP um es zu testen. Eine Frage hab ich aber noch:

Wie kann ich es machen, dass er die Werte in eine schon bestehende Tabelle schreibt? Ich hatte es mal vor ein paar Tagen probiert, hat leider nicht geklappt. Deshalb wollte ich eine neue Tabelle erstellen. Vorhin hab ich erfahren, dass die Tabelle nicht wie bisher gelöscht werden soll, sondern die Datensätze angehängt werden sollen.

Gruß

[Robert_G]

SQL-Code:

INSERT INTO NewTest
  SELECT n1, n2, n3 
  FROM  test 
  WHERE Datum >= :iVonDT

Dabei müssen die Spaltendefinitionen der Abfrage mit denen der Tabelle "kompatibel" sein.