님들~궁금한 사항이 있습니다.!!!!
제가 IM_SUBMIT_DATE라는 필드를 만들어서 거기에 날짜들을 저장했습니다
(참고로 필드 속성은 문자구여...파라독스디비입니다.형태는 20030514형식으로 저장되어 있습니다.)
그 저장된 필드를 이용해서 특정 기간(예 : 20030101~20030514) 동안의 내용을 조회하고 싶습니다.
아래 내용은 MDB를 조회하는 방법입니다.
근데 파라독스를 똑같은 방법으로 조회를 하려고 하니 안되더군여..
님들 어떻게 해야 하나요~?
도와주세여~!!!
sql :='Select * From CUSREPI_HEADER Where ';
Temp1 := FormatDateTime('MM-DD-YYYY',DateEdit1.date);
Temp2 := FormatDateTime('MM-DD-YYYY',DateEdit2.date);
//기간을 입력 받습니다.
Sql := Sql + ' (IM_SUBMIT_DATE Between #' + Temp1 +'# and #' + Temp2 + '#)';
참고로 오류 메세지는 Type mismatch in expression.이라고 뜹니다.
동영상으로 제작해서 보내드릴려고 했는데..
파일 Size가 너무 크더군여.. 8MB정도..
아~~ 각설하구여..
Coding로 답을 해 드리져..
Procedure BetweenSearch(l_Query: TQuery; Date1, Date2: TDate)
Begin
With l_Query Do
Begin
Close;
With SQL Do
Begin
Clear;
Add(' SELECT * FROM CUSREPI_HEADER ');
Add(' WHERE IM_SUBMIT_DATE BETWEEN :PRM_1 ');
Add(' AND :PRM_2 ');
End;
ParamByName('PRM_1').AsString := FormatDateTime('YYYYMMDD', Date1);
ParamByName('PRM_2').AsString := FormatDateTime('YYYYMMDD', Date2);
Open;
End;
End;
함수를 사용하실때에는
BetweenSearch(Query1, DateEdit1.Date, DateEdit2.Date);
Query1은 폼에 미리 만들어 놓은 Query를 말합니다..
즉, 실제 사용하실 Query컴포넌트의 이름입니다..
요렇게 사용하시길..
꼭 Procedure로 만들지 않아도 해당 내용을 이해하시리라 믿습니다.. *^^*
답이 되셨기를 바랍니다..