Дополнительное поля в Select в которой значение из EDIT

[silent_lab]

Всем здрасти !
Возник вопрос как добавить дополнительные поля в SELECT с уже присвоенными значениями, бд Access.

вот пример запроса :

INSERT INTO Table2 SELECT Table1.Pole1, Table1.Pole2, ('+Edit1.text+') AS Pole3, ('+DateTimePicker.Date+') AS DateIMP FROM Table1

не получаеться. Подскажите как реализовать.

[Yurk@]

INSERT INTO Table2 SELECT Table1.Pole1, Table1.Pole2, '+Edit1.text+', '+DateTimePicker.Date+' FROM Table1

а так?
если нет, можно попробовать заменить переменные на параметры

[silent_lab]

попробую ща отпишусь

[silent_lab]

выдает ошибку ((((
вот код:

with TADOCommand.Create(nil) do
              try
                Connection := AConnection;
                CommandText := 'INSERT INTO imp_lpu SELECT xls_imp.A, xls_imp.B, xls_imp.C, xls_imp.D, xls_imp.E, xls_imp.F, xls_imp.G, '+DateToStr(DateTimePicker1.Date)+', '+Edit1.Text+' FROM xls_imp';
                 try
                  Execute;
                 except
                  ShowMessage('Ошибка Обьединения !');

                 end;
              finally
                Free;
              end;

[Yurk@]

а текст ошибки можно глянуть то?)
и заодно: таблица imp_lpu соответствует выборке по полям "xls_imp.A, xls_imp.B, xls_imp.C, xls_imp.D, xls_imp.E, xls_imp.F, xls_imp.G, '+DateToStr(DateTimePicker1.Date)+' , '+Edit1.Text+'" ?

[silent_lab]

Да количество полей равно + в таблице imp_lpu 1е поле счетчик (id).
тоесть выходит что в таблице xls_imp - 9 полей , а в таблице imp_lpu -10 так как 1е поле счетчик (id)
именно код ошибки и не говорит уменято клиент самописный.

[silent_lab]

Еще из за разных имен полей может быть ?

[Аватар]

SQL не понимает текст полученный из DateToStr(DateTimePicker1.Date). Его как минимум в кавычки нужно взять и все равно не факт, что поймет, если поле-приемник типа дата-время. Лучше параметризировать запрос. Имена полей не причем. Главное, что бы приведение типов нормально сработало

[silent_lab]

поле даты, имеет тип строки

[silent_lab]

INSERT INTO imp_lpu
SELECT xls_imp. as n_p, xls_imp.B as date_v,xls_imp.C as fio_v_tabn, xls_imp.D as fio_p, xls_imp.E as sn_polis, xls_imp.F as snils, xls_imp.G as sn_recept, '09,10,1978' as date_imp, 'NEWSSSSS' as id_lpu
FROM xls_imp;

А вот так Access разрешил !!! что самое странное