Выбор людей из базы в ходящих в определенный возрастной диапазон

[city32]

Ситуация следующая. Есть База данных с датой рождения. Можно ли создать запрос чтобы исходя из даты рождения выводились люди входящие в диапазон 1 запрос:до 30 лет
2 запрос :от 31 до 35.
Таблица аксесс, данные через ADO.

[_SERGEYX_]

  var FDateBegin, FDateEnd: TDateTime;
..........................
{от сейчас минусуем 30 лет умноженное на 365 дней..
високосные годы тоже можно посчитать, если не лень}

FDateBegin:= now - 30 * 365;
FDateEnd:= now;

with Query do
  begin
  Close;
  SQL.Text := 'SELECT * FROM your_table ' +
                        'WHERE date BETWEEN :date_begin AND :date_end;';
  ParamByName('date_begin').AsDateTime := FDateBegin;
  ParamByName('date_end').AsDateTime := FDateEnd;
  Open;
  end;

Запрос не проверял... пишу без delphi.
Для второго запроса, наверно так

FDateBegin:= now - 35 * 365;
FDateEnd:= now - 31 * 365;

Может и проще можно, хз, надо подумать...

[Аватар]

Вместо

FDateBegin:= now - 30 * 365;

чтобы не было запарки с високосными годами удобней

FDateBegin:=IncMonth(now,-30*12);

[city32]

Ругается на ParamByName

[Surgeon]

Наверно

YourQuery.Parameters.ParamByName....

надо

[city32]

Теперь ругается на AsDateTime

[Surgeon]

Можно попробовать:

YourQuery.Parameters.ParamByName('MYPARAMETER').Value:=....

Крайне рекомендую жать F1, там есть не только объяснялка, но и примеры использования бывают.

[Serge_Bliznykov]

1) если уж использовать такой подход, тогда я безоговорочно за вариант получения начальной даты (c) Аватар

FDateBegin:=IncMonth(now,-30*12);

2) можно и вообще без параметров обойтись для решения задачи.

посмотрите вот в этой теме: Подсчет возраста

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

select ageTT.* from
(SELECT *, 
IIf(DateSerial(Year(Now()), Month([DD]), Day([DD])) - Date() > 0,
Year(Now())-Year([DD])-1, Year(Now())-Year([DD]) ) as FullAge FROM table3) ageTT
where AgeTT.FullAge between 17 and 25;
-- DD замените на имя поля, где забита дата рождения
-- Table3 замените на имя Вашей таблицы

Вам остаётся только вставить имена своей таблицы и поля с датой рождения,
указать какой должен быть полный возраст в годах (например,

where AgeTT.FullAge <= 30

) и всё!

[city32]

Спасибо огромное за помощь, работает.
И вдогонку вопросик: можно ли сделать запрос такого характера:
из таблицы 1 выбрать всех кто (должность =врач) и (учет =специальный учет) и кроме тех кто (звание не равно лейтенант)

[Serge_Bliznykov]

select * from Таблица1
 where doljnost = 'врач'
   and uchet = 'специальный учет'
   and zvanie<>'лейтенант'