먼저..기간별 조회를 하려고 하거든요~
지금은 기간 하나만은 가지고 검색은 됩니다..
쿼리를 어떻게 써야 언제부터 언제까지...라는 조회가 가능한지 궁금해서요~procedure
TfrmAdmin.btnSearch2Click(Sender: TObject);
var
sId, sDate, sInTime, sOutTime, sTotal, sNote : String;
sSql : String;
begin
sDate := txtFind.text;
sId := txtId.Text;
if trim(sid) <> '' then
begin
sSql := ' Select Id, Date, InTime, OutTime, OtherTime, Total '
+ ' From Pay'
+ ' where Id = '
+ '"'+sid+'"'
+ ' and Date like '
+ '"'+sDate+'%"';
cnQueryExe(Query2, sSql);
end;
지금 이상태에서 어떻게 쿼리를 해야..
~부터 ~까지의 기간 조회가 되는건가요?
고수님들..알려주세요~ ^^
> 먼저..기간별 조회를 하려고 하거든요~
> 지금은 기간 하나만은 가지고 검색은 됩니다..
> 쿼리를 어떻게 써야 언제부터 언제까지...라는 조회가 가능한지 궁금해서요~procedure
>
> TfrmAdmin.btnSearch2Click(Sender: TObject);
> var
> sId, sDate, sInTime, sOutTime, sTotal, sNote : String;
> sSql : String;
> begin
> sDate := txtFind.text;
> sId := txtId.Text;
> if trim(sid) <> '' then
> begin
> sSql := ' Select Id, Date, InTime, OutTime, OtherTime, Total '
> + ' From Pay'
> + ' where Id = '
> + '"'+sid+'"'
> + ' and Date like '
> + '"'+sDate+'%"';
>
> cnQueryExe(Query2, sSql);
> end;
>
> 지금 이상태에서 어떻게 쿼리를 해야..
> ~부터 ~까지의 기간 조회가 되는건가요?
> 고수님들..알려주세요~ ^^
With Query1 do
Begin
Sql.Close;
Sql.Clear;
Sql(" Select * From PAY ")
Sql(" Where DATE >= :Date1 ")
Sql(" And DATE <= :Date2 ")
ParamByName('Date1").AsString := Edit1.Text;
ParamByName('Date2").AsString := Edit2.Text;
Open;
end
이런식으로 해보세요....