Q&A

  • DBgrid에 데이터 뿌려주기에서 질문...
안녕하세요 처음으로 질문을 올립니다. (물론 초보입니다. ^^;)



DBgrid와 Excel을 데이터소스와 ADO쿼리를 이용해서 연결했는데요...



select문에서 'select * from table1 where id_code =: load_id_code'로 했습니다.



load_id_code는 그때그때 만들어집니다.(일부러)



그래서 DBgrid에 처음에 뿌려주는 게 아무것도 없고,(그러니까 그 테이블을 열려는 목적이죠) 테이블을 일단 연 후에 데이터를 하나씩 하나씩 넣으려고 합니다.



그런데 에러가 납니다. 도와주세요



[그 부분 소스]...

Select_item.Close;

Select_item.SQL.Clear;

Select_item.SQL.Add('select * from table2');

Select_item.SQL.Add('where id_code =:LOAD_ID_CODE');

Select_item.parameters.parambyname('LOAD_ID_CODE').value := A1.text;

Select_item.Open;



if Select_item.IsEmpty then

begin

showmessage(' 아이템이 존재하지 않습니다.');

A1.Text := '';

A1.SetFocus;

end

// new_itemadd; //찾고자 하는 내용이 없을때



else

begin

A2.Text := Trim(Select_item.FieldByName('id_desc').AsString);

A3.Value := 1;

A4.Value := Select_item.FieldByName('xprice').AsFloat;

i := Select_item.FieldByName('taxrate').AsFloat;

i := (A3.Value * A4.Value) * i;

A5.Value := i;

A6.Value := (A3.Value * A4.Value) + A5.Value;

Select_item.Close;



Save_item.Close;

Save_item.SQL.clear;

Save_item.SQL.Add('Select * from table1 where id_code =: load_id_code');

Save_item.Parameters.ParamByName('load_id_code').Value := InvNoE.Text;

Save_item.Open;

Save_item.Append;

Save_item.Edit;

Save_item.FieldValues['inv_no'] := InvNoE.Text;

Save_item.FieldValues['src_code'] := src_code.Text;

Save_item.FieldValues['src_name'] := src_name.Text;

Save_item.FieldValues['id_code'] := A1.Text;

Save_item.FieldValues['id_desc'] := A2.Text;

Save_item.FieldValues['Quantity'] := A3.Value;

Save_item.FieldValues['Price'] := A4.Value;

Save_item.FieldValues['Tax'] := A5.Value;

Save_item.FieldValues['Amount'] := A6.Value;

Save_item.Post;



Add_Sum(Sender);

A3.SetFocus;

end;



[에러 구문]...

Project code3.exe raised exception class EDatabaseError with message 'Save_item:Parameter 'load_id_code' not found'. Process stopped. Use Step or Run to continue.

이 게시물을
2  COMMENTS
  • Profile
    컴맹 • 2000.10.30 21:03
    안녕하세여..

    컴맹입니다..

    소스를 이에러 메시지는 파라메타가 존재 하지 않는다는 메시시입니다.

    제가 보기에는 뛰어쓰기를 하신것같은데여..

    파라메타를 사용하실때에는 :변수 이런식으로 절대루 뛰어쓰기를

    하면 않되는 걸루 알구 있습니다.

    문제 의 그부분은...아래..

    else

    begin

    A2.Text := Trim(Select_item.FieldByName('id_desc').AsString);

    A3.Value := 1;

    A4.Value := Select_item.FieldByName('xprice').AsFloat;

    i := Select_item.FieldByName('taxrate').AsFloat;

    i := (A3.Value * A4.Value) * i;

    A5.Value := i;

    A6.Value := (A3.Value * A4.Value) + A5.Value;

    Select_item.Close;

    Save_item.Close;

    Save_item.SQL.clear;

    //******************요기 load_id_code 에 뛰어쓰기를 잘못 하신것같네여..********

    Save_item.SQL.Add('Select * from table1 where id_code =: load_id_code');

    //****************************************************************************

    Save_item.Parameters.ParamByName('load_id_code').Value := InvNoE.Text;

    Save_item.Open;

    Save_item.Append;

    Save_item.Edit;

    Save_item.FieldValues['inv_no'] := InvNoE.Text;

    Save_item.FieldValues['src_code'] := src_code.Text;

    Save_item.FieldValues['src_name'] := src_name.Text;

    Save_item.FieldValues['id_code'] := A1.Text;

    Save_item.FieldValues['id_desc'] := A2.Text;

    Save_item.FieldValues['Quantity'] := A3.Value;

    Save_item.FieldValues['Price'] := A4.Value;

    Save_item.FieldValues['Tax'] := A5.Value;

    Save_item.FieldValues['Amount'] := A6.Value;

    Save_item.Post;









    > Select_item.Close;

    > Select_item.SQL.Clear;

    > Select_item.SQL.Add('select * from table2');

    > Select_item.SQL.Add('where id_code =:LOAD_ID_CODE');

    > Select_item.parameters.parambyname('LOAD_ID_CODE').value := A1.text;

    > Select_item.Open;

    >

    > if Select_item.IsEmpty then

    > begin

    > showmessage(' 아이템이 존재하지 않습니다.');

    > A1.Text := '';

    > A1.SetFocus;

    > end

    > // new_itemadd; //찾고자 하는 내용이 없을때

    >

    > else

    > begin

    > A2.Text := Trim(Select_item.FieldByName('id_desc').AsString);

    > A3.Value := 1;

    > A4.Value := Select_item.FieldByName('xprice').AsFloat;

    > i := Select_item.FieldByName('taxrate').AsFloat;

    > i := (A3.Value * A4.Value) * i;

    > A5.Value := i;

    > A6.Value := (A3.Value * A4.Value) + A5.Value;

    > Select_item.Close;

    >

    > Save_item.Close;

    > Save_item.SQL.clear;

    > Save_item.SQL.Add('Select * from table1 where id_code =: load_id_code');

    > Save_item.Parameters.ParamByName('load_id_code').Value := InvNoE.Text;

    > Save_item.Open;

    > Save_item.Append;

    > Save_item.Edit;

    > Save_item.FieldValues['inv_no'] := InvNoE.Text;

    > Save_item.FieldValues['src_code'] := src_code.Text;

    > Save_item.FieldValues['src_name'] := src_name.Text;

    > Save_item.FieldValues['id_code'] := A1.Text;

    > Save_item.FieldValues['id_desc'] := A2.Text;

    > Save_item.FieldValues['Quantity'] := A3.Value;

    > Save_item.FieldValues['Price'] := A4.Value;

    > Save_item.FieldValues['Tax'] := A5.Value;

    > Save_item.FieldValues['Amount'] := A6.Value;

    > Save_item.Post;

    >

    > Add_Sum(Sender);

    > A3.SetFocus;

    > end;

    >

    > [에러 구문]...

    > Project code3.exe raised exception class EDatabaseError with message 'Save_item:Parameter 'load_id_code' not found'. Process stopped. Use Step or Run to continue.

  • Profile
    김재억 • 2000.10.30 20:57
    SQL 구문에서 오류가 났네요.

    'Select * from table1 where id_code =: load_id_code'

    가 아니구요..

    'Select * from table1 where id_code = :load_id_code'

    입니다.

    즉, '=: load_id_code'가 아니구요.. '= :load_id_code' 입니다.

    즐코하세요. ^.^



    이상림 wrote:

    > 안녕하세요 처음으로 질문을 올립니다. (물론 초보입니다. ^^;)

    >

    > DBgrid와 Excel을 데이터소스와 ADO쿼리를 이용해서 연결했는데요...

    >

    > select문에서 'select * from table1 where id_code =: load_id_code'로 했습니다.

    >

    > load_id_code는 그때그때 만들어집니다.(일부러)

    >

    > 그래서 DBgrid에 처음에 뿌려주는 게 아무것도 없고,(그러니까 그 테이블을 열려는 목적이죠) 테이블을 일단 연 후에 데이터를 하나씩 하나씩 넣으려고 합니다.

    >

    > 그런데 에러가 납니다. 도와주세요

    >

    > [그 부분 소스]...

    > Select_item.Close;

    > Select_item.SQL.Clear;

    > Select_item.SQL.Add('select * from table2');

    > Select_item.SQL.Add('where id_code =:LOAD_ID_CODE');

    > Select_item.parameters.parambyname('LOAD_ID_CODE').value := A1.text;

    > Select_item.Open;

    >

    > if Select_item.IsEmpty then

    > begin

    > showmessage(' 아이템이 존재하지 않습니다.');

    > A1.Text := '';

    > A1.SetFocus;

    > end

    > // new_itemadd; //찾고자 하는 내용이 없을때

    >

    > else

    > begin

    > A2.Text := Trim(Select_item.FieldByName('id_desc').AsString);

    > A3.Value := 1;

    > A4.Value := Select_item.FieldByName('xprice').AsFloat;

    > i := Select_item.FieldByName('taxrate').AsFloat;

    > i := (A3.Value * A4.Value) * i;

    > A5.Value := i;

    > A6.Value := (A3.Value * A4.Value) + A5.Value;

    > Select_item.Close;

    >

    > Save_item.Close;

    > Save_item.SQL.clear;

    > Save_item.SQL.Add('Select * from table1 where id_code =: load_id_code');

    > Save_item.Parameters.ParamByName('load_id_code').Value := InvNoE.Text;

    > Save_item.Open;

    > Save_item.Append;

    > Save_item.Edit;

    > Save_item.FieldValues['inv_no'] := InvNoE.Text;

    > Save_item.FieldValues['src_code'] := src_code.Text;

    > Save_item.FieldValues['src_name'] := src_name.Text;

    > Save_item.FieldValues['id_code'] := A1.Text;

    > Save_item.FieldValues['id_desc'] := A2.Text;

    > Save_item.FieldValues['Quantity'] := A3.Value;

    > Save_item.FieldValues['Price'] := A4.Value;

    > Save_item.FieldValues['Tax'] := A5.Value;

    > Save_item.FieldValues['Amount'] := A6.Value;

    > Save_item.Post;

    >

    > Add_Sum(Sender);

    > A3.SetFocus;

    > end;

    >

    > [에러 구문]...

    > Project code3.exe raised exception class EDatabaseError with message 'Save_item:Parameter 'load_id_code' not found'. Process stopped. Use Step or Run to continue.
    • 한대필
    • •
    • 2000.10.31 00:58
    • 3 COMMENTS
    • /
    • 0 LIKES
    날짜 넣기
    • 이선경
      •
      2000.10.31 01:07
      tmain.fieldbyname('d_date').asdatetime:=now ;
    • 한대필
      •
      2000.10.31 01:38
      답은 정말로 감사합니다. 정말로 잘되는 군요!!! 하지만 다시 질문이 있습니다. tmain.fieldbyname('...
    • 한하눌
      •
      2000.10.31 05:04
      한대필 wrote: > > 답은 정말로 감사합니다. 정말로 잘되는 군요!!! > 하지만 다시 질문이 있습니다. ...
    • 질문
    • 2000.10.31 00:24
    • 0 COMMENTS
    • /
    • 0 LIKES
    엑셀에서 오라클로 변환하려면?
    • 호짐
    • 2000.10.30 23:55
    • 0 COMMENTS
    • /
    • 0 LIKES
    두 테이블의 레코드를 동시에 UPDATESQL delete문에서 삭제할수 있나요?
    • ㅜ.ㅜ
    • •
    • 2000.10.31 00:34
    • 1 COMMENTS
    • /
    • 0 LIKES
    quick report에서 qrRichedit로 화일을 출력하는문제
    • 이창환
      •
      2000.10.31 03:32
      OnPrint 이벤트를 활용하세요... 찍기전에 해당 라인이 몇라인인지.. 해당 필드의 데이타를 검사해서.. 4...
    • 왕초보
    • •
    • 2000.10.30 23:47
    • 4 COMMENTS
    • /
    • 0 LIKES
    중복(부탁)
    • 구창민
      •
      2000.10.30 23:51
      왕초보 wrote: > 안녕하세요.. > 회원가입 폼을 만들고 있는데.. > 아이디,패스워드.패스워드 확인 을 ...
    • 왕초보
      •
      2000.10.31 00:59
      그런데 질문을 잘못한것 같네요 그러니까 등록 하기전 조사하면 되는줄은 알겟는데.. 제 말은 그걸 어떻...
    • 신재용
      •
      2000.10.31 01:35
      중복여부를 클릭했을때 Flag를 변경해서 등록시에 체크하면 되겠네여~~~ 예를 들면, 로그인화면에서 Flag...
    • 왕초보
      •
      2000.10.31 22:15
      신재용 wrote: > 중복여부를 클릭했을때 Flag를 변경해서 > 등록시에 체크하면 되겠네여~~~ > 예를 들면...
  • rollback segment는 어떻게 지정하나요..
    • 장수정
    • •
    • 2000.10.30 23:42
    • 1 COMMENTS
    • /
    • 0 LIKES
    [Q]좀 갈켜주세요..
    • 구창민
      •
      2000.10.30 23:46
      장수정 wrote: > 다른 IP주소의 특정 폴더로 접근하여 파일을 저장하거나 > Load할수 있는 방법 좀 갈켜...
    • cell
    • •
    • 2000.10.30 23:29
    • 3 COMMENTS
    • /
    • 0 LIKES
    사용자 권한으로 메뉴 활성화/비활성화
    • cell
      •
      2000.10.31 01:59
      문제가 해결되었습니다. 유용한 정보를 가르쳐줘서 고맙습니다.
    • 한하눌
      •
      2000.10.30 23:55
      cell wrote: > > 로그인시 DB에서 사용자 권한을 가져와서 각 메뉴의 활성화/비활성화를 하려 합니다. ...
    • 구창민
      •
      2000.10.30 23:48
      cell wrote: > > 로그인시 DB에서 사용자 권한을 가져와서 각 메뉴의 활성화/비활성화를 하려 합니다. ...
    • delcho
    • •
    • 2000.10.30 23:13
    • 1 COMMENTS
    • /
    • 0 LIKES
    다른 어플이 내 폼위에 있을때 아는 방법은??
    • 구창민
      •
      2000.10.30 23:50
      delcho wrote: > 질문한것처럼 다른 어플이 내폼에 살짝 걸쳤을때 어떤 메세지를 주고 싶은데여.. > ...
    • cico
    • •
    • 2000.10.30 22:51
    • 2 COMMENTS
    • /
    • 0 LIKES
    좀 갈켜주세요! 답답! 될것도 같은데...
    • 한하눌
      •
      2000.10.30 23:41
      cico wrote: > DBgrid로 받은 한 필드의 값을 스트링그리드에 넣고 싶은데... > > 어찌하면 좋을까요? ...
    • cico
      •
      2000.10.31 00:31
      정말 감사합니다. 정말 하라는 데로 했더니 제가 원하는 그값을 정확이 받았습니다. 뭐라고 감사의 ...
    • 친구
    • 2000.10.30 22:46
    • 0 COMMENTS
    • /
    • 0 LIKES
    엑티브 폼 보기 힘드네요... 도와주세요...
    • 궁금맨
    • •
    • 2000.10.30 22:31
    • 1 COMMENTS
    • /
    • 0 LIKES
    숫자나 문자로만 입력제한
    • 구창민
      •
      2000.10.30 23:55
      궁금맨 wrote: > 에디트박스에 사용자 입력을 받을때 숫자나 문자 둘중 하나로난 입력되게 할려구 하면 어...
    • 반정현
    • •
    • 2000.10.30 22:18
    • 1 COMMENTS
    • /
    • 0 LIKES
    memo1 에서. 찾기 기능을 넣고 싶은데...
    • 구창민
      •
      2000.10.30 23:56
      반정현 wrote: > > memo1에 찾기 기능을 넣고 싶습니다.. > > 특정단어를 찾아서.. > > 커서...
    • 김인수
    • •
    • 2000.10.30 22:01
    • 2 COMMENTS
    • /
    • 0 LIKES
    activex폼을 이용해 C/S 데이터베이스를 구축할때
    • 이진우
      •
      2000.10.31 01:17
      김인수 wrote: > 저 너무 초짜라구 욕하지들 마세염 ㅜ.ㅠ; > > activex폼에 table을 놓고 데이터베이...
    • 김인수
      •
      2000.10.31 01:31
      BDE를 같이 배포하지 않고 서버쪽에 있는 데이터베이스에 연결하는 방법이 알고 시포요.. 제가 질문을 ...
    • sonny
    • •
    • 2000.10.30 21:51
    • 2 COMMENTS
    • /
    • 0 LIKES
    FormatDateTime 윤년문제
    • 한하눌
      •
      2000.10.30 23:34
      sonny wrote: > > 현재일자기준으로해서 1년전 날짜를 구하는데 > > FormatDateTime('yyyymmdd',sysd...
    • sonny
      •
      2000.10.31 17:41
      한하눌 wrote: > sonny wrote: > > > > 현재일자기준으로해서 1년전 날짜를 구하는데 > > > > Forma...
    • 김태영
    • •
    • 2000.10.30 21:38
    • 1 COMMENTS
    • /
    • 0 LIKES
    도와주세요.
    • 한하눌
      •
      2000.10.31 00:26
      김태영 wrote: > 델파이와 비주얼 베이직을 함께 사용하는 사람인데요. 어떤 회사의 프로그램을 델파이와 ...
    • 윤광희
    • •
    • 2000.10.30 21:31
    • 2 COMMENTS
    • /
    • 0 LIKES
    [Q]CGI 만들어서 콘솔로 실행하면 OK, CGI로 돌리면 DB에러
    • 윤광희
      •
      2000.10.31 02:09
      이 ODBC문제가 ACCESS인 경우에만 발생하는 것 같습니다. MySQL에서는 발생하지 않네요.
    • s6763
      •
      2000.12.14 21:59
      윤광희 wrote: > 이 ODBC문제가 ACCESS인 경우에만 발생하는 것 같습니다. > MySQL에서는 발생하지 않네...
    • 이상림
    • •
    • •
    • 2000.10.30 20:33
    • 2 COMMENTS
    • /
    • 1 LIKES
    DBgrid에 데이터 뿌려주기에서 질문...
    안녕하세요 처음으로 질문을 올립니다. (물론 초보입니다. ^^;) DBgrid와 Excel을 데이터소스와 ADO쿼리를 이용해서 연결했는데요... select문에서 'select * from table1 where id_code =: load_id_code'로 했습니다. load_id_code는 그...
    • 컴맹
      •
      2000.10.30 21:03
      안녕하세여.. 컴맹입니다.. 소스를 이에러 메시지는 파라메타가 존재 하지 않는다는 메시시입니다. 제가...
    • 김재억
      •
      2000.10.30 20:57
      SQL 구문에서 오류가 났네요. 'Select * from table1 where id_code =: load_id_code' 가 아니구요.....
    • raeganja
    • •
    • 2000.10.30 20:29
    • 1 COMMENTS
    • /
    • 0 LIKES
    sql 문에서 from 키워드가 있어야 할 곳에 없다고 나오는데요..
    • ...
      •
      2000.10.30 23:57
      raeganja wrote: > select a.관리번호, b.규격명, c.소분류명, d.자산위치명, a.베이셀프[1,4] || - || a....
  • 질문) Quickrep에서 문의
←First Page
2153 2154 2155 2156 2157 2158 2159 2160 2161 2162
Last Page→
한델 로그인 하기