Q&A

  • 주소를 넣으면 우편번호도 자동으로 입력하는 방식 알퀴줘용.
도와주십시오. 델고수님들...

보시면 아시겠지만..주소를 넣으면 우편번호도 자동으로 입력하는 방식으로 SQL문의 update를 입력하려 합니다. 서브쿼리를 이용해서 나온 값을 update할려고 하는데..

이상하게 실행시키면 다 지워져 버립니다. update도 안되고요..



코딩을 해주셔도 좋고, 다른 소스나 힌트를 주셔도 좋습니다.

흔한 소스인것 같은데 어떻게 검색하던지 제가 원하는 소스는 찾을 수가 없더군요.

소스가 있었도 안됐었는데.. 정말 막막하군요.



procedure TForm1.Button3Click(Sender: TObject);

begin

if DBEdit3.text = '' then //DEEdit3 = unitprice값

begin //unitprice값이 null이면 DBEdit2값(BookItem)을 참조해서 입력

with Query1 do

begin

Close;

SQL.Clear;

SQL.Add('update booking set BooKUnitPrice = ');

SQL.Add('(select ITEMUP from Library where ItemName = :s5)');

SQL.Add('where BookItem = :s5');

ParamByName('s5').AsString := Trim(DBEdit2.text);

ExecSQL;

end;

end;

end;

이 게시물을
2  COMMENTS
  • Profile
    4master • 2000.07.28 09:38
    이건영 wrote:

    > 도와주십시오. 델고수님들...

    > 보시면 아시겠지만..주소를 넣으면 우편번호도 자동으로 입력하는 방식으로 SQL문의 update를 입력하려 합니다. 서브쿼리를 이용해서 나온 값을 update할려고 하는데..

    > 이상하게 실행시키면 다 지워져 버립니다. update도 안되고요..

    >

    > 코딩을 해주셔도 좋고, 다른 소스나 힌트를 주셔도 좋습니다.

    > 흔한 소스인것 같은데 어떻게 검색하던지 제가 원하는 소스는 찾을 수가 없더군요.

    > 소스가 있었도 안됐었는데.. 정말 막막하군요.

    >

    > procedure TForm1.Button3Click(Sender: TObject);

    > begin

    > if DBEdit3.text = '' then //DEEdit3 = unitprice값

    > begin //unitprice값이 null이면 DBEdit2값(BookItem)을 참조해서 입력

    > with Query1 do

    > begin

    > Close;

    > SQL.Clear;

    > SQL.Add('update booking set BooKUnitPrice = ');

    > SQL.Add('(select ITEMUP from Library where ItemName = :s5)');

    > SQL.Add('where BookItem = :s5');

    > ParamByName('s5').AsString := Trim(DBEdit2.text);

    > ExecSQL;

    > end;

    > end;

    > end;



    저도 이것과 비슷한 프로그램을 짜보았는데요.

    질문에 맞는 답변인지? ㅠㅠ

    우선 모든 데이터가 있는 디비(?)를 루프 시키거나 일치값을 찾아 같은 필드(입력값을 저장하는)나 다른 필드에 저장하는 거요.

    그냥 FieldByName을 사용하면 편할 거 같은데.

    쓸데 없는 말이였습니다.



    아 그리고... 저한테 상당한 정확한 우편디비가 있습니다. 제가 수십개를 보았지만

    가장 정확한 겁니다.(수작업을 많이 했다나.) Access화일로 되어있습니다.

    필요하면 멜 주세요.





  • Profile
    이건영 • 2000.07.28 20:27
    답변감사합니다.

    제가 워낙초보라서 좀 더 자세한 설명좀 부탁드립니다. 그래주시면 정말 고맙겠습니다.

    일단 하긴했는데..



    procedure TForm1.Button3Click(Sender: TObject);

    begin

    if DBEdit3.text = '' then //DBEdit3 = unitprice값

    begin

    Query1.FieldByName('BooKUnitPrice')AsFloat := [여기를 다른 쿼리에서 연관된 데이타 값을 가져와야 하는데.. 어떻게 하는지 잘 모르겠습니다.]



    ...

    간단한 방법이 있을것 같은데.. 제가 위낙 초보라서리.. 죄송합니다.

    한번만 더 도와주세요.

    그리고 그 우편디비 좀 보내주시길 부탁드립니다.



    그럼 이만 꾸벅~~



    4master wrote:

    > 이건영 wrote:

    > > 도와주십시오. 델고수님들...

    > > 보시면 아시겠지만..주소를 넣으면 우편번호도 자동으로 입력하는 방식으로 SQL문의 update를 입력하려 합니다. 서브쿼리를 이용해서 나온 값을 update할려고 하는데..

    > > 이상하게 실행시키면 다 지워져 버립니다. update도 안되고요..

    > >

    > > 코딩을 해주셔도 좋고, 다른 소스나 힌트를 주셔도 좋습니다.

    > > 흔한 소스인것 같은데 어떻게 검색하던지 제가 원하는 소스는 찾을 수가 없더군요.

    > > 소스가 있었도 안됐었는데.. 정말 막막하군요.

    > >

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

    > > begin

    > > if DBEdit3.text = '' then //DEEdit3 = unitprice값

    > > begin //unitprice값이 null이면 DBEdit2값(BookItem)을 참조해서 입력

    > > with Query1 do

    > > begin

    > > Close;

    > > SQL.Clear;

    > > SQL.Add('update booking set BooKUnitPrice = ');

    > > SQL.Add('(select ITEMUP from Library where ItemName = :s5)');

    > > SQL.Add('where BookItem = :s5');

    > > ParamByName('s5').AsString := Trim(DBEdit2.text);

    > > ExecSQL;

    > > end;

    > > end;

    > > end;

    >

    > 저도 이것과 비슷한 프로그램을 짜보았는데요.

    > 질문에 맞는 답변인지? ㅠㅠ

    > 우선 모든 데이터가 있는 디비(?)를 루프 시키거나 일치값을 찾아 같은 필드(입력값을 저장하는)나 다른 필드에 저장하는 거요.

    > 그냥 FieldByName을 사용하면 편할 거 같은데.

    > 쓸데 없는 말이였습니다.

    >

    > 아 그리고... 저한테 상당한 정확한 우편디비가 있습니다. 제가 수십개를 보았지만

    > 가장 정확한 겁니다.(수작업을 많이 했다나.) Access화일로 되어있습니다.

    > 필요하면 멜 주세요.

    >

    >

←First Page
2339 2340 2341 2342 2343 2344 2345 2346 2347 2348
Last Page→
한델 로그인 하기