Диапазон поиска в БД

[true1]

БД На аксесе, мне нужно знать например какие нарушения совершили сотрудники от 12.12.04 по 13.04.05, неполучается это сдела и вывести например в мемо помогите вот код по которому я работаю могу дать исходник парни выручайте

примерный код:

procedure TForm1.Button1Click(Sender: TObject);
var
f:string;
b:string;
i:integer;
begin
f:=Edit1.Text;
b:=Edit2.Text;
i:=Datamodule2.ADOTable1.RecordCount;
DataModule2.ADOTable1.First;
while i>0 do
begin
i:=i-1;
if
(DataModule2.ADOTable1DSDesigner??.AsString>f)
and (DataModule2.ADOTable1DSDesigner??.AsString<b)
then

??
DataModule2.ADOTable1.Next;
end;

end;

не использую ADoQuery,я исходник залил может кто нить поможет.. там есть форма вот на нее вывест нужно туда мемо добавлю а дбэдит удалю мне главное чтобы диапазон работал.. выручайте


_http://zalil.ru/30003517

ну или так обьясните я сам попробую.. Спасибо

[true1]

--=-Ап-=--