Datensätze verschieben!

[bttb930]

du schreibst ja super beiträge, der andere mit den tabellen senkrecht ist genauso klasse.

machs mit ner abfrage:

Delphi-Quellcode:

with TADOQuery.Create do
try
  Connection := ...
  SQL.Clear;
  SQL.Add('INSERT INTO tab2 (SELECT * FROM tab1 WHERE whereclause)');
  if ExecSQL > 0 then
  begin
    SQL.Clear;
    SQL.Add('DELETE FROM tab1 WHERE whereclause');
    ExecSQL;
  end;
finally
  Free;
end;

Irgendwie so müsste es klappen. Wobei die Tabellen gleiche Felder haben müssen. Und mit dem DELETE-Befehl solltest Du vorsichtig sein: Wenn der vorherige INSERT-Befehl fehlgeschlagen ist, dann löschst Du Daten die Du nicht löschen willst.