Q&A

  • Query1문에서 8월이 생일인 사람만 찾고 싶어요
안녕하세요?

Query1에서 생일이 4월 또는 다른 월별로 찾아 볼려고 합니다.

어떻게 하여야 Date 변수에서 월만 검색 할수 있나요?



procedure TForm1.N_JdateClick(Sender: TObject);

var

Day : TDateTime;

begin

Day := StrToDate(Edit1.Text);

with Form1.Query1 do begin

Query1.SQL.Clear;

Query1.SQL.ADD('SELECT *');

Query1.SQL.ADD('FROM DataJdata.DB');

Query1.SQL.ADD('WHERE');

// Query1.SQL.ADD('Jdate = Day');

Open;

end

end;





3  COMMENTS
  • Profile
    김광섭 2001.03.17 02:00
    이미숙 wrote:

    > 안녕하세요?

    > Query1에서 생일이 4월 또는 다른 월별로 찾아 볼려고 합니다.

    > 어떻게 하여야 Date 변수에서 월만 검색 할수 있나요?

    >

    > procedure TForm1.N_JdateClick(Sender: TObject);

    > var

    > Day : TDateTime;

    > begin

    > Day := StrToDate(Edit1.Text);

    > with Form1.Query1 do begin

    > Query1.SQL.Clear;

    > Query1.SQL.ADD('SELECT *');

    > Query1.SQL.ADD('FROM DataJdata.DB');

    > Query1.SQL.ADD('WHERE');

    > // Query1.SQL.ADD('Jdate = Day');

    > Open;

    > end

    > end;

    >

    >

    sql 문에 substring함수가 있는데 이걸 쓴다면 쉽게 해결 될텐데...

    쓰는 방법은 copy명령하구 같아요 ^^

    substring(Jdate,5,2) = copy(Day,5,2);

  • Profile
    바람개비 2001.03.15 09:25
    꼭 Date 변수여야 한다면

    이런 방법도 있울수가 있겠네요.

    4월을 원한다면 4월1일부터 4월 30일까지 사이의 데이타만 추출...



    바라미~



    이미숙 wrote:

    > 안녕하세요?

    > Query1에서 생일이 4월 또는 다른 월별로 찾아 볼려고 합니다.

    > 어떻게 하여야 Date 변수에서 월만 검색 할수 있나요?

    >

    > procedure TForm1.N_JdateClick(Sender: TObject);

    > var

    > Day : TDateTime;

    > begin

    > Day := StrToDate(Edit1.Text);

    > with Form1.Query1 do begin

    > Query1.SQL.Clear;

    > Query1.SQL.ADD('SELECT *');

    > Query1.SQL.ADD('FROM DataJdata.DB');

    > Query1.SQL.ADD('WHERE');

    > // Query1.SQL.ADD('Jdate = Day');

    // 요기..

    query1.sql.add('jdate >= :date1 and jDate <= :date2');

    parambyname('date1').asdatetime:=encodedate(2000,4,1);

    parambyname('date2').asDatetime:=encodedate(2000,5,1)-1;

    > Open;

    > end

    > end;

    >

    >

  • Profile
    저두초보 2001.03.15 09:23
    이미숙 wrote:

    > 안녕하세요?

    > Query1에서 생일이 4월 또는 다른 월별로 찾아 볼려고 합니다.

    > 어떻게 하여야 Date 변수에서 월만 검색 할수 있나요?

    >

    > procedure TForm1.N_JdateClick(Sender: TObject);

    > var

    > Day : TDateTime;

    > begin

    > Day := StrToDate(Edit1.Text);

    > with Form1.Query1 do begin

    > Query1.SQL.Clear;

    > Query1.SQL.ADD('SELECT *');

    > Query1.SQL.ADD('FROM DataJdata.DB');

    > Query1.SQL.ADD('WHERE');

    > // Query1.SQL.ADD('Jdate = Day');

    > Open;

    > end

    > end;

    >

    >



    맞는지 저두 잘 몰라요

    날짜필드에서 원하는 년,월,일만 떼어낸다는 거 밖에...

    다음 예제를 참고하세요...



    SELECT DOB, LastName, FirstName

    FROM People

    WHERE (EXTRACT(MONTH FROM DOB) = 5)



    DELPHI HELP화일을 참조하세요...