Please how use BETWEEN in this script ?
1. DTPicker1 = from data
2. DTPicker2 = to data
/////////
procedure TForm3.Button3Click(Sender: TObject);
begin
With CRP1 do
begin connect := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=dbase.mdb;Persist Security Info=False;Pwd='+ 'system';
SelectionFormula = '{Total1.Data} BETWEEN'+ DTPicker1 to DTPicker2
ReportFileName := 'RPT.RPT';
WindowState := crptMaximized;
WindowTitle := 'REPORT';
Action := 1;
end;
end;
/////
Many thanks!!!
1. DTPicker1 = from data
2. DTPicker2 = to data
/////////
procedure TForm3.Button3Click(Sender: TObject);
begin
With CRP1 do
begin connect := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=dbase.mdb;Persist Security Info=False;Pwd='+ 'system';
SelectionFormula = '{Total1.Data} BETWEEN'+ DTPicker1 to DTPicker2
ReportFileName := 'RPT.RPT';
WindowState := crptMaximized;
WindowTitle := 'REPORT';
Action := 1;
end;
end;
/////
Many thanks!!!