не работает SQL запрос ((

[Kara1989]

Здравствуйте, уважаемые прогеры!
Наткнулся с одной проблемой, связанной с параметрическим запросом.
При фильтрации данных программа выдает такую ошибку:
"Несоответствие типов данных в выражении условия отбора". Думаю, что вся проблема связана с датами. Хотелось бы чтоб, фильтрация осуществлялась и при выборе 1 из 2 дат.
Помогите с решением данной проблемы, уже полдня голову ломаю над ней
Заранее спасибо за отклик!

p.s.: исходник проекта выложил

[WorldMaster]

SQL запрос в вашем случае будет выглядеть следующим образом

SELECT * FROM Sotrudniki WHERE (((Fam Like :A) and (Imya Like :B) and (Otch Like :C) and (DRZh between :D and :E))) Order by Fam;

Однако обратите внимание что дата в аксесе должна задачаться следующим видом
2007/08/24 => Year/Month/Day

А вообще запросы перед вставкой в код проще и удобнее отлаживать в самом аксесе. Там наглядно будет видно где ошибка.

[Kara1989]

Form1.ADOQuery1.Close;
Form1.ADOQuery1.SQL.Clear;
Form1.ADOQuery1.SQL.Add('SELECT * FROM Sotrudniki WHERE (((Fam Like :A) and (Imya Like :B) and (Otch Like :C) and (DRZh >= :D) and (DRZh <= :E))) Order by Fam');
If Length(Form1.Edit1.Text) <> 0 then Form1.ADOQuery1.Parameters.ParamByName('A').Value:='%'+Form1.Edit1.Text+'%' else Form1.ADOQuery1.Parameters.ParamByName('A').Value:='%';
If Length(Form1.Edit2.Text) <> 0 then Form1.ADOQuery1.Parameters.ParamByName('B').Value:='%'+Form1.Edit2.Text+'%' else Form1.ADOQuery1.Parameters.ParamByName('B').Value:='%';
If Length(Form1.Edit3.Text) <> 0 then Form1.ADOQuery1.Parameters.ParamByName('C').Value:='%'+Form1.Edit3.Text+'%' else Form1.ADOQuery1.Parameters.ParamByName('C').Value:='%';
if Form1.DateTimePicker1.Format <> ' ' then Form1.ADOQuery1.Parameters.ParamByName('D').Value:=Form1.DateTimePicker1.Date else Form1.ADOQuery1.Parameters.ParamByName('D').Value:='%';
if Form1.DateTimePicker2.Format <> ' ' then Form1.ADOQuery1.Parameters.ParamByName('E').Value:=Form1.DateTimePicker2.Date else Form1.ADOQuery1.Parameters.ParamByName('E').Value:='%';
Form1.ADOQuery1.Open;

Запрос в данном случае,если выбрать обе даты, работает нормально, при выборе одной из дат или при пустом DateTime выходит подобная ошибка.
"Несоответствие типов данных в выражении условия отбора"
Хотелось бы чтоб, фильтрация осуществлялась и при выборе 1 из 2 дат.

[Serge_Bliznykov]

огорчу Вас. Так не получится.
подстановочный знак '%' допустим исключительно в операторах LIKE со строками.
для даты (тем более для операции "больше-равно" / "меньше-равно") такое SQL не позволяет.

решение. либо формировать строку запрос "на лету" в зависимости от того, пустые даты выбраны или нет,
либо передавать в качестве параметра D дату, ЗАВЕДОМО меньшую, чем любая в таблице (например, 1.1.1900),
а в качестве параметра E - заведомо БОЛЬШУЮ, чем любая в таблице (например, 1.1.2345)


p.s. меня мучают смутные сомнения...
а разве в стандартном timedatepicker можно задать ПУСТУЮ дату?!

[Yurk@]

держи
обрати внимание на изменения
P.S. в решении частично учтены подсказки WorldMaster и Serge_Bliznykov