Промежуток между датами!

Привет всем! Надо вывести записи входящие в промежуток между датами! Дату задаешь на DateTimePicker.
пишу так:

zappodat.ADOQuery1.Close;
 zappodat.ADOQuery1.SQL.Clear;
 zappodat.ADOQuery1.SQL.Add('SELECT **  FROM * ');
 zappodat.ADOQuery1.SQL.Add('WHERE (data >=#13/04/2009#)');
 zappodat.ADOQuery1.SQL.Add('and (data<=#17/04/2009#)');
 zappodat.ADOQuery1.Open;

все выводит,
пишу так:

data1:=(DateTimePicker1.DateTime);
  data2:=(DateTimePicker2.DateTime) ;
  zappodat.ADOQuery1.Active:=False;
  zappodat.ADOQuery1.SQL.Clear;
  zappodat.ADOQuery1.SQL.Add('SELECT **');
  zappodat.ADOQuery1.SQL.Add(' FROM *');
  zappodat.ADOQuery1.SQL.Add('WHERE (data>=data1) and (data<=data2)');
  zappodat.ADOQuery1.Active:=true;

Выводит ошибку: Параметр data1 не имеет значения по умолчанию.

Lenr,

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

А по конкретнее? Ну очень уж нужно!

Lenr

пишу так: data1:=(DateTimePicker1.DateTime); data2:=(DateTimePicker2.DateTime) ; zappodat.ADOQuery1.Active:=False; zappodat.ADOQuery1.SQL.Clear; zappodat.ADOQuery1.SQL.Add('SELECT **'); zappodat.ADOQuery1.SQL.Add(' FROM *'); zappodat.ADOQuery1.SQL.Add('WHERE (data>=data1) and (data<=data2)'); zappodat.ADOQuery1.Active:=true; Выводит ошибку: Параметр data1 не имеет значения по умолчанию.

В поиск, мильон раз приводились примеры.

Да знаю что много примеров, но немогу найти подходящее!!!(((

Lenr

Да знаю что много примеров, но немогу найти подходящее!!!(((

Наберите в строке поиска фразу - "ПАРАМЕТРЫ, ПАРАМЕТРЫ, ПАРАМЕТРЫ"

Lenr,

попробуй так:

zappodat.ADOQuery1.SQL.Text:= 
'SELECT **  FROM * WHERE (data>= :data1) and (data<= :data2)';
zappodat.ADOQuery1.Prepare;
zappodat.ADOQuery1.Parameter.ParamByName('data1').Value:= DTPicker1.DateTime;
..... //далее по аналогии

зы. Параметр, эта такая штука, перед которой стоит двоеточие (как в часах 14 поделить на 00)

Всё, спасибо Док. Сделал как ты сказал(с небольшими переделками)! Главное все получилось :-)