Q&A

  • db에 입력하는 코딩임다..에러가 계속떠서..
//입력문임당..

procedure Thakjf.Button1Click(Sender: TObject);

begin

saveq1.close;

saveq1.sql.clear;

saveq1.sql.add(' insert into mit ');

saveq1.sql.add(' ( hakbun, kname, hname, ename, grade, juya, hakgwa, sex, ) ');

saveq1.sql.add(' ( bjpost, bjjuso1, bjjuso2, hspost, hsjuso1, hsjuso2, ');

saveq1.sql.add(' ( gspost, gsjuso1, gsjuso2, hstelno, taste, special, email, ) ');

saveq1.sql.add(' ( hsbbno, chulname, chuljol, bhname, bhjob, bhgwan ) ');

saveq1.sql.add(' values ( :hakbun, :kname, :hname, :ename, :grade, :juya, :hakgwa, :sex, ) ');

saveq1.sql.add(' ( :bjpost, :bjjuso1, :bjjuso2, :hspost, :hsjuso1, :hsjuso2, ) ');

saveq1.sql.add(' ( :gspost, :gsjuso1, :gsjuso2, :hstelno, :taste, :special, :email, ) ');

saveq1.sql.add(' ( :hsbbno, :chulname, :chuljol, :bhname, :bhjob, :bhgwan ) ');

//학번

saveq1.parambyname('hakbun').asstring := ehakbun.text;

//성명(한글,한자,영문)

saveq1.parambyname('kname').asstring := ekname.text;

saveq1.parambyname('hname').asstring := ehname.text;

saveq1.parambyname('ename').asstring := eename.text;

//학년,주야,학과,성별

saveq1.ParamByName('grade').asstring := egrade.items[egrade.itemindex];

saveq1.ParamByName('juya').asstring := ejuya.items[ejuya.itemindex];

saveq1.ParamByName('hakgwa').asstring := ehakgwa.text;

saveq1.ParamByName('sex').asstring := esex.items[esex.itemindex];



//juminno



//전화 번호,이동 전화

saveq1.parambyname('hstelno').asstring := ehstelno.text;

saveq1.parambyname('hsbbno').asstring := ehsbbno.text;

//본적

saveq1.parambyname('bjpost').asstring := ebjpost.Text;

saveq1.parambyname('bjjuso1').asstring := ebjjuso1.text;

saveq1.parambyname('bjjuso2').asstring := ebjjuso2.text;

//주소

saveq1.parambyname('hspost').asstring := ehspost.text;

saveq1.parambyname('hsjuso1').asstring := ehsjuso1.text;

saveq1.parambyname('hsjuso2').asstring := ehsjuso2.text;

//현주소

saveq1.parambyname('gspost').asstring := egspost.text;

saveq1.parambyname('gsjuso1').asstring := egsjuso1.text;

saveq1.parambyname('gsjuso2').asstring := egsjuso2.text;

//출신학교

saveq1.parambyname('chulname').asstring := echulname.text;

saveq1.parambyname('chuljol').asstring := echuljol.text;

//취미,특기,이메일

saveq1.parambyname('taste').asstring := etaste.text;

saveq1.parambyname('special').asstring := especial.text;

saveq1.parambyname('email').asstring := eemail.text;

//보호자

saveq1.parambyname('bhname').asstring := ebhname.text;

saveq1.parambyname('bhgwan').asstring := ebhgwan.text;

saveq1.parambyname('bhjob').asstring := ebhjob.text;





saveq1.execsql;

showmessage('저장 완료.');

close;



end;



에러가 뜨거든요..

제가 처음에 db 필드가 작을때는 에러가 안떳어요..

그래서 db가 길어서 그런거 같아서 짧게 했는데두 안되네요..

에러 메세지는..=

ProjectjungP1.exe raised exception class EDBEngineError with message 'lnvalid use of key word.

Token:)

Line Number:2'.Process stoped Use Step or Run to contiune.



고수분들 해결좀 부탁..





1  COMMENTS
  • Profile
    최혜룡 2001.05.08 08:53
    에러메시지를 잘 확인하셔야 합니다

    lnvalid use of key word. Token: Line Number:2

    님이 BDE로 보낸 쿼리는 아래와 같습니다

    insert into mit

    ( hakbun, kname, hname, ename, grade, juya, hakgwa, sex, )

    ( bjpost, bjjuso1, bjjuso2, hspost, hsjuso1, hsjuso2,

    ( gspost, gsjuso1, gsjuso2, hstelno, taste, special, email, )

    ( hsbbno, chulname, chuljol, bhname, bhjob, bhgwan )

    values ( :hakbun, :kname, :hname, :ename, :grade, :juya, :hakgwa, :sex, )

    ( :bjpost, :bjjuso1, :bjjuso2, :hspost, :hsjuso1, :hsjuso2, )

    ( :gspost, :gsjuso1, :gsjuso2, :hstelno, :taste, :special, :email, )

    ( :hsbbno, :chulname, :chuljol, :bhname, :bhjob, :bhgwan )

    수정하면..

    insert into mit

    ( hakbun, kname, hname, ename, grade, juya, hakgwa, sex,

    bjpost, bjjuso1, bjjuso2, hspost, hsjuso1, hsjuso2,

    gspost, gsjuso1, gsjuso2, hstelno, taste, special, email,

    hsbbno, chulname, chuljol, bhname, bhjob, bhgwan )

    values ( :hakbun, :kname, :hname, :ename, :grade, :juya, :hakgwa, :sex,

    :bjpost, :bjjuso1, :bjjuso2, :hspost, :hsjuso1, :hsjuso2,

    :gspost, :gsjuso1, :gsjuso2, :hstelno, :taste, :special, :email,

    :hsbbno, :chulname, :chuljol, :bhname, :bhjob, :bhgwan )











    jungs wrote:

    > //입력문임당..

    > procedure Thakjf.Button1Click(Sender: TObject);

    > begin

    > saveq1.close;

    > saveq1.sql.clear;

    > saveq1.sql.add(' insert into mit ');

    > saveq1.sql.add(' ( hakbun, kname, hname, ename, grade, juya, hakgwa, sex, ) ');

    > saveq1.sql.add(' ( bjpost, bjjuso1, bjjuso2, hspost, hsjuso1, hsjuso2, ');

    > saveq1.sql.add(' ( gspost, gsjuso1, gsjuso2, hstelno, taste, special, email, ) ');

    > saveq1.sql.add(' ( hsbbno, chulname, chuljol, bhname, bhjob, bhgwan ) ');

    > saveq1.sql.add(' values ( :hakbun, :kname, :hname, :ename, :grade, :juya, :hakgwa, :sex, ) ');

    > saveq1.sql.add(' ( :bjpost, :bjjuso1, :bjjuso2, :hspost, :hsjuso1, :hsjuso2, ) ');

    > saveq1.sql.add(' ( :gspost, :gsjuso1, :gsjuso2, :hstelno, :taste, :special, :email, ) ');

    > saveq1.sql.add(' ( :hsbbno, :chulname, :chuljol, :bhname, :bhjob, :bhgwan ) ');

    > //학번

    > saveq1.parambyname('hakbun').asstring := ehakbun.text;

    > //성명(한글,한자,영문)

    > saveq1.parambyname('kname').asstring := ekname.text;

    > saveq1.parambyname('hname').asstring := ehname.text;

    > saveq1.parambyname('ename').asstring := eename.text;

    > //학년,주야,학과,성별

    > saveq1.ParamByName('grade').asstring := egrade.items[egrade.itemindex];

    > saveq1.ParamByName('juya').asstring := ejuya.items[ejuya.itemindex];

    > saveq1.ParamByName('hakgwa').asstring := ehakgwa.text;

    > saveq1.ParamByName('sex').asstring := esex.items[esex.itemindex];

    >

    > //juminno

    >

    > //전화 번호,이동 전화

    > saveq1.parambyname('hstelno').asstring := ehstelno.text;

    > saveq1.parambyname('hsbbno').asstring := ehsbbno.text;

    > //본적

    > saveq1.parambyname('bjpost').asstring := ebjpost.Text;

    > saveq1.parambyname('bjjuso1').asstring := ebjjuso1.text;

    > saveq1.parambyname('bjjuso2').asstring := ebjjuso2.text;

    > //주소

    > saveq1.parambyname('hspost').asstring := ehspost.text;

    > saveq1.parambyname('hsjuso1').asstring := ehsjuso1.text;

    > saveq1.parambyname('hsjuso2').asstring := ehsjuso2.text;

    > //현주소

    > saveq1.parambyname('gspost').asstring := egspost.text;

    > saveq1.parambyname('gsjuso1').asstring := egsjuso1.text;

    > saveq1.parambyname('gsjuso2').asstring := egsjuso2.text;

    > //출신학교

    > saveq1.parambyname('chulname').asstring := echulname.text;

    > saveq1.parambyname('chuljol').asstring := echuljol.text;

    > //취미,특기,이메일

    > saveq1.parambyname('taste').asstring := etaste.text;

    > saveq1.parambyname('special').asstring := especial.text;

    > saveq1.parambyname('email').asstring := eemail.text;

    > //보호자

    > saveq1.parambyname('bhname').asstring := ebhname.text;

    > saveq1.parambyname('bhgwan').asstring := ebhgwan.text;

    > saveq1.parambyname('bhjob').asstring := ebhjob.text;

    >

    >

    > saveq1.execsql;

    > showmessage('저장 완료.');

    > close;

    >

    > end;

    >

    > 에러가 뜨거든요..

    > 제가 처음에 db 필드가 작을때는 에러가 안떳어요..

    > 그래서 db가 길어서 그런거 같아서 짧게 했는데두 안되네요..

    > 에러 메세지는..=

    > ProjectjungP1.exe raised exception class EDBEngineError with message 'lnvalid use of key word.

    > Token:)

    > Line Number:2'.Process stoped Use Step or Run to contiune.

    >

    > 고수분들 해결좀 부탁..

    >

    >

    • jimba
    • 2001.05.08 10:09
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 화랑
      2001.05.11 02:20
      jimba wrote: > 고수님께 부탁드립니다. > > 로컬에서의 DLL의 위치를 알 수 없을 까요? > TApplicato...
    • jungs
    • 2001.05.08 08:41
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 최혜룡
      2001.05.08 08:53
      에러메시지를 잘 확인하셔야 합니다 lnvalid use of key word. Token: Line Number:2 님이 BDE로 보낸 쿼...
    • 김석수
    • 2001.05.08 08:33
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 안재현
      2001.05.08 18:16
      김석수 wrote: > 10의 제곱, 3승, 4승 등 계산은 어떨게 합니까 ? > 연산자가 있나요 ? > > POWER ...
    • 찬밥
    • 2001.05.08 08:25
    • 4 COMMENTS
    • /
    • 0 LIKES
    • 찬밥
      2001.05.09 07:33
      찬밥 wrote: > 안녕하세요.. > 제가 이번에 아주 아주 간단한... > IP를 네트워크 환경에 가지 않고 ...
    • 최혜룡
      2001.05.08 08:38
      그런 프로그램이 있더라구요 방법은 저도 궁금 찬밥 wrote: > 안녕하세요.. > 제가 이번에 아주 ...
    • 찬밥
      2001.05.08 18:54
      최혜룡 wrote: > 그런 프로그램이 있더라구요 > 방법은 저도 궁금 > > > 찬밥 wrote: > > 안녕하...
    • 최혜룡
      2001.05.08 19:01
      www.plustech.co.kr에 가시면 되겠군요 IP Changer라는 프로그램입니다. 찬밥 wrote: > 최혜룡 wrot...
    • 강경태
    • 2001.05.08 07:46
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 최혜룡
      2001.05.08 08:41
      암호테이블은 id가 키로 잡혀있어야 겠죠 id,pass 입력받으면 해당id의 pass를 쿼리나,Table콤포로 읽어...
    • 안재현
      2001.05.08 07:19
      아직도초보 wrote: > 델파이로 프로그램을 만들고 그림판에서 256색으로 > 아이콘을 만들었습니다. (확장...
    • 아직도초보
      2001.05.08 08:01
      근데 윈도우 그림판에서 확장명을 ico로 저장하면 아이콘이 만들어지는건 어떻게 된건가요? 다른 프로그...
    • 안재현
      2001.05.08 08:16
      아직도초보 wrote: > 근데 윈도우 그림판에서 확장명을 ico로 저장하면 > 아이콘이 만들어지는건 어떻게 ...
    • 최종민
    • 2001.05.08 04:54
    • 3 COMMENTS
    • /
    • 0 LIKES
    • loke
      2001.05.08 05:07
      while 문 안에다 application.processmessages 를 써 보시죠.. while 식 do begin 변수값; a...
    • 최종민
      2001.05.08 05:22
      loke wrote: > while 문 안에다 > application.processmessages 를 써 보시죠.. > while 식 do > be...
    • 델맨
      2001.05.10 01:27
      Timer 이벤트는 윈도우 루프를 통해 실행됩니다. 그러므로 while문 사이에서 윈도우 메세지가 처리되지 않...
    • AIZIM
    • 2001.05.08 04:37
    • 2 COMMENTS
    • /
    • 0 LIKES
    • 이만준
      2001.05.08 04:51
      안녕하세요... 저는 이렇게 사용하지요... Query1 의 AfterOpen 이벤트에서... 한라인만 써주면 ...
    • AIZIM
      2001.05.08 19:00
      가르침 부탁드립니다. 그런데...방금전에 테스트를 해봤는데..않되더군요.. 실행전에...dbchart컴포넌트...
    • 감초
      2001.05.08 18:41
      가장 빠른 방법 : Delphi의 시간은 실수로 되어 있고 여기서 정수부분이 하루, 나머지 소수 부분이 시...
    • 이만준
      2001.05.08 04:56
      안녕하세요.... DecodeTime, EncodeTime 이나 DateTimeToTimeStamp, TimeStampToDateTime 함수를 이...
    • 안재현
      2001.05.08 04:56
      궁금돌이 wrote: > 오전 10:00:00라는 시작시간이 있습니다. > 여기에 간격을 50이라고 주면 끝시간이 ...
    • 최혜룡
      2001.05.08 06:00
      쿼리에서 연산을 하는것 같은데 연산에 사용되는 값에 따라 결과치가 비정상적인것이 있지 않나 생각되...
    • 채지원
      2001.05.08 03:31
      서광진 wrote: > function Tcivilform.udateTointch(a : string) : integer ; > var > s :string ; > ...
    • 나그네
      2001.05.08 05:57
      가능합니다. 대신에 무슨 컴포넌트를 사용하셨는지 모르지만 클라이언트프로그램에TCPClient뿐만 아니라 TC...
    • 바보감자
      2001.05.08 05:41
      절대강자 wrote: > 알고싶습니다... > 델파이로 여러개의 방을 나누고 채팅하는것이 가능합니까? > 1:1...
    • 코난
    • 2001.05.08 02:06
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 류종택
      2001.05.08 03:07
      간단한 방법 하나 올립니다.. 일단 폼 맨위에 판넬을 올려놓고.. 이미지 처리하시던 어떤식으로던 캡션...
    • 강동희
    • 2001.05.08 01:00
    • 5 COMMENTS
    • /
    • 0 LIKES
    • 2001.05.08 01:26
      강동희 wrote: > CALCTABL입니다. > > C_UID(문항번호) || NO(답변) ||C_POINT(점수) || C_RATE(가중...
    • 강동희
      2001.05.08 01:36
      얀 wrote: > 강동희 wrote: > > CALCTABL입니다. > > > > C_UID(문항번호) || NO(답변) ||C_POINT(점...
    • 2001.05.08 02:01
      > distinct 를 풀어서 하지 마시고 이런경우에는 > 화면상의 POST와 EXECSQL문을 같이 사용하세야 합니다....
    • 2001.05.08 01:32
      얀 wrote: > 강동희 wrote: > > CALCTABL입니다. > > > > C_UID(문항번호) || NO(답변) ||C_POINT(점...
    • 지나가는이
      2001.05.08 01:10
      강동희 wrote: > CALCTABL입니다. > > C_UID(문항번호) || NO(답변) ||C_POINT(점수) || C_RATE(가중...
    • 최혜룡
      2001.05.08 06:03
      소스를 보지않고는 답변이 어렵겠구요. 기밀에 속하는게 아니면 소스를 올려보시길. 짱아 wrote: > db...
    • 짱아
      2001.05.08 06:23
      ㅋㅋ 죄송해여~ 소스 올려봤자 읽기 귀찮아 하실것 같아서 .. 죄송죄송 이게 바로 그 문제의 소스 입니...