Q&A

  • 우편번호 검색 하는건데....
우편번호 검색하는건데요....

동이름만 쓰면 검색 되는데요... 동이름 뒤에 1동 형식으로 붙이면 되지 않는데

알려주시면 정말 감사 하겠습니다.

예)마포동, 오치동 하면 검색이 되는데...

마포1동, 오치1동 하면 검색이 않되거든요...

소스를 붙여 드리겠습니다. 고수님들의 조언 부탁드립니다.

procedure Tcode.Button1Click(Sender: TObject);

begin

with query1 do begin

close;

prepare;

sql.Clear;

sql.add('select * from zip');

sql.add('where dong like"' + edit1.Text + '"');

open;

end;

end;



procedure Tcode.Button2Click(Sender: TObject);

begin

edit2.text:= query1.fieldbyname('zipcode').asstring;

edit3.text:= query1.fieldbyname('sido').asstring + ' ' +

query1.fieldbyname('gugun').asstring + ' ' +

query1.fieldbyname('dong').asstring + ' ' +

query1.fieldbyname('bunji').asstring ;

end;



procedure Tcode.Button3Click(Sender: TObject);

begin

close;

end;



end.

답변 부탁드립니다.

2  COMMENTS
  • Profile
    irookie 2001.11.28 23:02
    SQL



    select *

    from zip

    where dong like 마포%;



    이렇게 되어야 하죠.



    결론)

    edit1.Text 뒤에 %를 붙이세요 ^^



    my msm id : aha99@hanmir.com



    -





    이희환 wrote:

    > 우편번호 검색하는건데요....

    > 동이름만 쓰면 검색 되는데요... 동이름 뒤에 1동 형식으로 붙이면 되지 않는데

    > 알려주시면 정말 감사 하겠습니다.

    > 예)마포동, 오치동 하면 검색이 되는데...

    > 마포1동, 오치1동 하면 검색이 않되거든요...

    > 소스를 붙여 드리겠습니다. 고수님들의 조언 부탁드립니다.

    > procedure Tcode.Button1Click(Sender: TObject);

    > begin

    > with query1 do begin

    > close;

    > prepare;

    > sql.Clear;

    > sql.add('select * from zip');

    > sql.add('where dong like"' + edit1.Text + '"');

    > open;

    > end;

    > end;

    >

    > procedure Tcode.Button2Click(Sender: TObject);

    > begin

    > edit2.text:= query1.fieldbyname('zipcode').asstring;

    > edit3.text:= query1.fieldbyname('sido').asstring + ' ' +

    > query1.fieldbyname('gugun').asstring + ' ' +

    > query1.fieldbyname('dong').asstring + ' ' +

    > query1.fieldbyname('bunji').asstring ;

    > end;

    >

    > procedure Tcode.Button3Click(Sender: TObject);

    > begin

    > close;

    > end;

    >

    > end.

    > 답변 부탁드립니다.

  • Profile
    이희환 2001.11.29 10:27
    irookie wrote:조언정말 감사합니다. 그런데....

    sql.add('where dong like"' + edit1.Text % + '"');

    edit1.text 뒤에 %를 붙여도 되지않는데요 어떻게 하죠

    그냥 아무값도 나타나지 않는데....

    %를 붙이나 %를 않붙이나 값이 똑같이 않나옴니다.

    한번만 다시 봐 주세요..^^..

    > SQL

    >

    > select *

    > from zip

    > where dong like 마포%;

    >

    > 이렇게 되어야 하죠.

    >

    > 결론)

    > edit1.Text 뒤에 %를 붙이세요 ^^

    >

    > my msm id : aha99@hanmir.com

    >

    > -

    >

    >

    > 이희환 wrote:

    > > 우편번호 검색하는건데요....

    > > 동이름만 쓰면 검색 되는데요... 동이름 뒤에 1동 형식으로 붙이면 되지 않는데

    > > 알려주시면 정말 감사 하겠습니다.

    > > 예)마포동, 오치동 하면 검색이 되는데...

    > > 마포1동, 오치1동 하면 검색이 않되거든요...

    > > 소스를 붙여 드리겠습니다. 고수님들의 조언 부탁드립니다.

    > > procedure Tcode.Button1Click(Sender: TObject);

    > > begin

    > > with query1 do begin

    > > close;

    > > prepare;

    > > sql.Clear;

    > > sql.add('select * from zip');

    > > sql.add('where dong like"' + edit1.Text + '"');

    > > open;

    > > end;

    > > end;

    > >

    > > procedure Tcode.Button2Click(Sender: TObject);

    > > begin

    > > edit2.text:= query1.fieldbyname('zipcode').asstring;

    > > edit3.text:= query1.fieldbyname('sido').asstring + ' ' +

    > > query1.fieldbyname('gugun').asstring + ' ' +

    > > query1.fieldbyname('dong').asstring + ' ' +

    > > query1.fieldbyname('bunji').asstring ;

    > > end;

    > >

    > > procedure Tcode.Button3Click(Sender: TObject);

    > > begin

    > > close;

    > > end;

    > >

    > > end.

    > > 답변 부탁드립니다.