Q&A

  • SQL문이 실행
다음은 제가 작성한 SQL문입니다.

Trace해보면 SQL문이 실행이 되는데 SQL server 7.0 query generater에서

select문을 실행해보면 입력이 하나도 안 된것으로 나타나네요.

이유를 모르겠습니다.



procedure TResumeF.SpeedButton2Click(Sender: TObject);

begin

Try

Dm1F.ResumeQr.close;

Dm1f.ResumeQr.SQL.Clear;

Dm1F.resumeQr.sql.add(' insert into Dbo.ResumeTb values('''+edit3.text+''''

+ ' ,'''+edit2.Text+''','''+edit4.Text+''', :img'

+ ' ,'''+edit5.Text+''','''+edit6.Text+''','''+edit7.Text+''''

+ ' ,'''+maskedit1.Text+''','''+maskedit2.Text+''''

+ ' ,'''+edit8.Text+''','''+combobox2.Text+''','''+combobox1.Text+''''

+ ' ,'''+maskedit3.Text+''','''+edit9.Text+''','''+maskedit4.Text+''''

+ ' ,'''+edit10.Text+''','''+combobox3.Text+''','''+combobox4.Text+''''

+ ' ,'''+edit11.Text+''','''+edit12.text+''','''+maskedit5.Text+''''

+ ' ,'''+maskedit6.Text+''','''+maskedit7.Text+''','''+edit13.Text+''''

+ ' ,'''+combobox6.Text+''','''+combobox7.Text+''','''+combobox8.Text+''''

+ ' ,'''+maskedit8.Text+''','''+maskedit9.Text+''','''+combobox5.Text+''''

+ ' ,'''+edit14.Text+''','''+edit15.Text+''','''+edit16.Text+''''

+ ' ,'''+edit17.Text+''','''+combobox9.Text+''','''+edit20.Text+''''

+ ' ,'''+edit19.Text+''', :Selfmemo');

Dm1F.resumeQr.ParamByName('Img').LoadFromFile (openpicturedialog1.FileName,ftgraphic);

Dm1F.resumeQr.ParamByName('selfmemo').asmemo := memo1.text;

Dm1F.resumeQr.ExecSQL;

except

on EDBEngineError

do begin

showmessage('다시입력하세요...');

Dm1F.ResumeQr.cancel;

end;

end;

1  COMMENTS
  • Profile
    조복기 1999.06.15 05:55
    김태균 께서 말씀하시기를...

    > 다음은 제가 작성한 SQL문입니다.

    > Trace해보면 SQL문이 실행이 되는데 SQL server 7.0 query generater에서

    > select문을 실행해보면 입력이 하나도 안 된것으로 나타나네요.

    > 이유를 모르겠습니다.

    >

    > procedure TResumeF.SpeedButton2Click(Sender: TObject);

    > begin

    > Try

    > Dm1F.ResumeQr.close;

    > Dm1f.ResumeQr.SQL.Clear;

    > Dm1F.resumeQr.sql.add(' insert into Dbo.ResumeTb values('''+edit3.text+''''

    > + ' ,'''+edit2.Text+''','''+edit4.Text+''', :img'

    > + ' ,'''+edit5.Text+''','''+edit6.Text+''','''+edit7.Text+''''

    > + ' ,'''+maskedit1.Text+''','''+maskedit2.Text+''''

    > + ' ,'''+edit8.Text+''','''+combobox2.Text+''','''+combobox1.Text+''''

    > + ' ,'''+maskedit3.Text+''','''+edit9.Text+''','''+maskedit4.Text+''''

    > + ' ,'''+edit10.Text+''','''+combobox3.Text+''','''+combobox4.Text+''''

    > + ' ,'''+edit11.Text+''','''+edit12.text+''','''+maskedit5.Text+''''

    > + ' ,'''+maskedit6.Text+''','''+maskedit7.Text+''','''+edit13.Text+''''

    > + ' ,'''+combobox6.Text+''','''+combobox7.Text+''','''+combobox8.Text+''''

    > + ' ,'''+maskedit8.Text+''','''+maskedit9.Text+''','''+combobox5.Text+''''

    > + ' ,'''+edit14.Text+''','''+edit15.Text+''','''+edit16.Text+''''

    > + ' ,'''+edit17.Text+''','''+combobox9.Text+''','''+edit20.Text+''''

    > + ' ,'''+edit19.Text+''', :Selfmemo');

    > Dm1F.resumeQr.ParamByName('Img').LoadFromFile (openpicturedialog1.FileName,ftgraphic);

    > Dm1F.resumeQr.ParamByName('selfmemo').asmemo := memo1.text;

    > Dm1F.resumeQr.ExecSQL;

    > except

    > on EDBEngineError

    > do begin

    > showmessage('다시입력하세요...');

    > Dm1F.ResumeQr.cancel;

    > end;

    > end;



    안녕하세요..



    음냐..나중에 디버깅하기 진짜 힘들겠네요..

    제가 얼핏보기엔 마지막에 ')'가 빠진듯 싶은데..



    => insert into tablename values (val1, val2...)



    여러가지 문제가 발생할 가능성이 많기때문에

    sql문을 여러번 add시켜서 줄을 정리하든가

    아님 전부 파라미터로 받는식으로 하는게

    나중에 고치기에도 편하지않을까 생각하네요..

    첨에는 귀찮지만 필드명을 1:1 매치를 시켜도 나중에 편하죠..



    위문제가 아니라면 몇개필드만 insert해보세요..

    문제가 있는 필드가 있을수도..



    조복기였습니다.

    • 조복기
      1999.06.15 20:58
      김태균 께서 말씀하시기를... > 음.... 조복기님이 말하신대로 바꾸어서 실행했는데요... > 그래도 결과...
    • 조복기
      1999.06.15 21:11
      TString를 사용하는방법은 동일하지만 전 그때 이방법을 안쓰고 sql문장을 memo.line에 넣어두고 sql := ...
    • 이미옥
    • 1999.06.15 19:55
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 안치봉
      1999.06.15 21:05
      이미옥 께서 말씀하시기를... > 간단한 ActiveForm 예제(StringGrid에 값을 뿌려주는 예제)를 만들어서 익...
    • heart
    • 1999.06.15 19:02
    • 3 COMMENTS
    • /
    • 0 LIKES
    • 안치봉
      1999.06.15 19:05
      heart 께서 말씀하시기를... > > > 굴림체에서 0021에 해당하는 문자는 '!'인데 0021이란 입력값으...
    • heart
      1999.06.15 23:53
      안치봉 께서 말씀하시기를... > heart 께서 말씀하시기를... > > > > > > 굴림체에서 0021에 해당...
    • 안치봉
      1999.06.16 00:44
      heart 께서 말씀하시기를... > 안치봉 께서 말씀하시기를... > > heart 께서 말씀하시기를... > > > >...
    • 최기훈
    • 1999.06.15 18:37
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 안치봉
      1999.06.15 19:03
      procedure Tfrm.ButtonClick(Sender: TObject); var paramName: array[0..20] of TLabel; begin ...
    • 북해
    • 1999.06.15 17:57
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 안치봉
      1999.06.15 19:02
      북해 께서 말씀하시기를... > 안녕하세요. 동적생성한 버튼 객체를 없애려 하는데요 어떻게 하면 되는지요...
    • 김형철
    • 1999.06.15 08:41
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 박성훈
      1999.06.15 17:17
      DBGrid에서 수정을 하시려는 것 같군요. TQuery와 TDataSource를 DBGrid와 연결하셨을 테구요. 이상태에서...
    • 김태균
    • 1999.06.15 05:41
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 조복기
      1999.06.15 05:55
      김태균 께서 말씀하시기를... > 다음은 제가 작성한 SQL문입니다. > Trace해보면 SQL문이 실행이 되는데 ...
    • 유민호
    • 1999.06.15 05:16
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 김형태
      1999.06.15 17:25
      유민호 께서 말씀하시기를... > AS400에서 DB2를 사용하고 있으며 델파이 4를 이용합니다. > 근데 서버에...
    • Hans
    • 1999.06.15 03:26
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 강지영
      1999.06.15 19:07
      Hans 께서 말씀하시기를... > 인터베이스에서 db를 생성하려고 하는데, > 어떻게 해야하는지 맨날 -902에...
    • 송기원
    • 1999.06.15 03:10
    • 2 COMMENTS
    • /
    • 0 LIKES
    • 신인재
      1999.06.15 03:16
      oncreate에서 어플리케이션의 onshowhint이벤트 핸들러를 다시 정의 하여 사용하시면 되겠습니다. pro...
    • 송기원
      1999.06.15 03:39
      재가 궁금한것은 postMessage(handle, CM_HINTSHOW, wparam, lparma)과 같은 형식으로 Hint가 나오게 해야...
    • 김수영
    • 1999.06.15 02:36
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 신인재
      1999.06.15 03:11
      음냐~~~ 델파이의 세계에 첨 입문하신다고요.... 흐흐 정말 추카 드립니다... 제가 델파이를 시작한 ...
    • 신인재
      1999.06.15 02:59
      음냐 리치에딧 2.0을 사용하세요.... Rx라이브러리는 리치에딧2.0을 지원하는 대표적인 컴포넌트 모음입니...
    • 영인
    • 1999.06.15 02:09
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 신인재
      1999.06.15 02:56
      아래는 SpinEdit의 소스중의 일부입니다. 입력값을 걸러서 이벤트를 발생시키는 군요... 소스를 고치면 ...
    • sunhee
    • 1999.06.15 01:29
    • 0 COMMENTS
    • /
    • 0 LIKES
    • 성숙련
    • 1999.06.15 01:08
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 신인재
      1999.06.15 03:17
      에러 메세지와 관련코딩을 함 올려 주세요...... 성숙련 께서 말씀하시기를... > 안녕하세요... > 음....
    • 박성훈
    • 1999.06.15 00:59
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 신인재
      1999.06.15 03:30
      FindComponent란 TComponent의 메소드 입니다. 따라서 아래와 같이 바뀌어 져야 할꺼 같습니다... func...
    • 송기원
    • 1999.06.15 00:29
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 전철호
      1999.06.15 01:08
      송기원 께서 말씀하시기를... > control의 enabled상태가 false로 바뀌었을때의 색깔을 > 다른 색으로 ...
    • 손진운
    • 1999.06.15 00:27
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 전철호
      1999.06.15 00:59
      손진운 께서 말씀하시기를... > 안녕하세요. > 콤보박스에 item들을 add한후에 그 내용들을 몇 글자를 ...