Q&A

  • BDE에러좀 잡아 주세용
컴파일을 하고



입력을 다한후 저장을 하려니깐



''project icustomer.exe raised exception class EDBEngineError with Message

'General SQL error,

unclosed quotation mark before the character string '?)',

line 3:incorrect syntax near '?)',',procsee stopped.

use step or Run to Continue.''



라는 에러가 뜨는데



<<저장 루틴>>

with TbCuStom do begin

if FindKey([edtF01.Text,EdtF02.text]) then Edit

else begin

Append;

FieldByName('CusTomil').AsString := edtF01.Text;

FieldByName('CusTomNo').AsString := edtF02.Text;

end;

FieldByName('Chco').AsString := edtF03.Text;

FieldByName('Model').AsString := edtF04.Text;

FieldByName('Rev').AsString := edtF041.Text;

FieldByName('DamDang').AsString := edtF05.Text;

FieldByName('JaeJo').AsString := edtF06.Text;

FieldByName('Surang').asFloat := vfgSToD(edtF07.text);

FieldByName('ReqMemo').AsString := edtF08.Text;

FieldByName('JoChiMemo').AsString := edtF09.Text;

FieldByName('Bigo').AsString := edtF10.Text;

FieldByName('SaBun').AsString := edtF11.Text;

FieldByName('Wan').AsString := edtF12.Text;

Post;

refresh;

end;



어떻게야 하죠???

꼭 부탁드립니당

4  COMMENTS
  • Profile
    godurum 2001.03.13 02:02
    안녕하세요.

    델파이 초보인데요. 그냥 잘 못된 부분이 눈에 띄어서 이렇게 염치불구하고 글을

    씁니다.



    두가지로 생각할수있는데요.

    첫째, 조건문에서 findkey되려는필드가 Index로 잡혀있어야하는데, 어떤지요?

    둘째, 3번째줄 FieldByName('CusTomNo').AsString := edtF02.Text; 에서

    값이 확실히 Integer형이 String로 바뀔때 에러가 없었는지 확인해보세요.



    그럼 이만.....



    엔젤조 wrote:

    > 컴파일을 하고

    >

    > 입력을 다한후 저장을 하려니깐

    >

    > ''project icustomer.exe raised exception class EDBEngineError with Message

    > 'General SQL error,

    > unclosed quotation mark before the character string '?)',

    > line 3:incorrect syntax near '?)',',procsee stopped.

    > use step or Run to Continue.''

    >

    > 라는 에러가 뜨는데

    >

    > <<저장 루틴>>

    > with TbCuStom do begin

    > if FindKey([edtF01.Text,EdtF02.text]) then Edit

    > else begin

    > Append;

    > FieldByName('CusTomil').AsString := edtF01.Text;

    > FieldByName('CusTomNo').AsString := edtF02.Text;

    > end;

    > FieldByName('Chco').AsString := edtF03.Text;

    > FieldByName('Model').AsString := edtF04.Text;

    > FieldByName('Rev').AsString := edtF041.Text;

    > FieldByName('DamDang').AsString := edtF05.Text;

    > FieldByName('JaeJo').AsString := edtF06.Text;

    > FieldByName('Surang').asFloat := vfgSToD(edtF07.text);

    > FieldByName('ReqMemo').AsString := edtF08.Text;

    > FieldByName('JoChiMemo').AsString := edtF09.Text;

    > FieldByName('Bigo').AsString := edtF10.Text;

    > FieldByName('SaBun').AsString := edtF11.Text;

    > FieldByName('Wan').AsString := edtF12.Text;

    > Post;

    > refresh;

    > end;

    >

    > 어떻게야 하죠???

    > 꼭 부탁드립니당

  • Profile
    이성훈 2001.03.12 21:00
    전체 SQL문을 올려주세요...

    에러 메세지 내용은 SQL문 3번째 라인에 '?'이 잘못되었다고 하네요...

    앞쪽(올려주신 자료의 앞
  • Profile
    엔젤조 2001.03.12 21:10
    Sql 문은 쓰지 않았습니다



    쓴거라고는 Table 밖에 없는데...



    그럼 테이블이 잘못 된건 가요????



  • Profile
    이성훈 2001.03.12 23:20
    그런거 아닌것 같구여..

    일단 인서트할 테이블 구조를 올려주세요...

    제가 함 볼게요...