Копирование записей из одной таблицы в другую по условию

[Ernest027]

Подскажите пожалуйста, никак не могу понять, по всякому делаю, постоянно ошибки вылезают разные

[Ernest027]

var
date:TDateTime;
begin
DataModule2.ADOQuery4.Close;
DataModule2.ADOQuery4.SQL.Clear;
DataModule2.ADOQuery4.Parameters.ParamByName('d1').Value:=date;
DataModule2.ADOQuery4.Parameters.ParamByName('d2').Value:=DataModule2.ADOQuery3.FieldByName('Дата следующих замеров').AsDateTime;
DataModule2.ADOQuery4.SQL.Add('insert into Notification(Дата следующих замеров) select [Дата следующих замеров] from Oborudovanie where [Дата следующих замеров] >:d2 and [Дата следующих замеров] <:d1');
DataModule2.ADOQuery4.ExecSQL;
DataModule2.ADOQuery4.SQL.Add('select * from Notification');
DataModule2.ADOQuery4.Open;

adoquery4: parametr 'd1' not found

[Аватар]

Ernest027

То, что в #18 не вставка, а обновление записей. В sql - UPDATE. Insert для добавления новых записей. Прочувствуй разницу

[Ernest027]

забудем про #18.

var
date:TDateTime;
begin
date:=Now;
DataModule2.ADOQuery4.Close;
DataModule2.ADOQuery4.SQL.Clear;
DataModule2.ADOQuery4.SQL.Add('insert into Notification([Дата следующих замеров]) select [Дата следующих замеров] from Oborudovanie where ([Дата следующих замеров] >:d2 and [Дата следующих замеров] <:d1)');
DataModule2.ADOQuery4.Parameters.ParamByName('d1').Value:=FormatDateTime('dd.mm.yyyy', Date);
DataModule2.ADOQuery4.Parameters.ParamByName('d2').Value:=DataModule2.ADOQuery3.FieldByName('Дата следующих замеров').AsDateTime;
DataModule2.ADOQuery4.ExecSQL;
DataModule2.ADOQuery4.SQL.Add('select * from Notification');
DataModule2.ADOQuery4.Open;

так тоже не работает.

[Аватар]

Ну если забудем, то почитай про синтаксис Insert-а

[Ernest027]

http://www.w3schools.com/sql/sql_insert_into_select.aspделал по этому подобию, что неправильно?

[Аватар]

Это не синтаксис, а пример использования при полном совпадении полей в обеих таблицах

https://msdn.microsoft.com/en-us/library/ms174335.aspx

[Ernest027]

var
date:TDateTime;
begin
date:=Now;
DataModule2.ADOQuery4.Close;
DataModule2.ADOQuery4.SQL.Clear;
DataModule2.ADOQuery4.SQL.Add('insert into Notification([Дата следующих замеров])');
DataModule2.ADOQuery4.SQL.Add('values (d1,d2,(select [Дата следующих замеров] from Oborudovanie');
DataModule2.ADOQuery4.SQL.Add('where ([Дата следующих замеров] >:d2 and [Дата следующих замеров] <:d1)))');
DataModule2.ADOQuery4.Parameters.ParamByName('d1').Value:=date;
DataModule2.ADOQuery4.Parameters.ParamByName('d2').Value:=DataModule2.ADOQuery3.FieldByName('Дата следующих замеров').AsDateTime;
DataModule2.ADOQuery4.ExecSQL;
DataModule2.ADOQuery4.SQL.Add('select * from Notification');
DataModule2.ADOQuery4.Open;

все равно не хочет

недопустимое имя столбца d1

[evg_m]

почему(каким образом) ЭТОТ запрос

insert into Notification([Дата следующих замеров]) 
select [Дата следующих замеров] from Oborudovanie where ([Дата следующих замеров] >:d2 and [Дата следующих замеров] <:d1

превратился в ТАКОЕ

insert into Notification([Дата следующих замеров])
values (d1,d2,(select [Дата следующих замеров] from Oborudovanie
where ([Дата следующих замеров] >:d2 and [Дата следующих замеров] <:d1)))

[Adamrus]

ТС, просто напиши сюда структуру таблиц
Notification
Oborudovanie

нам тогда ЛЕГЧЕ будет помочь!