Q&A

  • 쿼리에서 데이타를 불러와서 변수에 넣기... 질문요...
쉽게 될듯 싶은데 안되네요...

쿼리에서 값을 불러와서 변수에 넣는 건데 필드의 합을 불러오니까 잘 안되네요...

var tot1,tot2 : Integer;

begin

adoquery2.Close;

adoquery2.SQL.Clear;

adoquery2.SQL.Add('select sum(kor) as kor_tot, sum(eng) as eng_tot from jumsu');

adoquery2.ExecSQL;



tot1 := adoquery2.FieldByName('kor_tot').AsInteger; --> 에러나는 부분

tot2 := adoquery2.FieldByName('eng_tot').AsInteger; --> 에러나는 부분

end;



쿼리 그대로 엑세스에서 돌리면 잘 돌아갑니다.

그리고 에러나는 두줄 삭제하면 이상 없습니다.

tot1, tot2에 값을 넣어 주는게 잘못된거 같은데 어떻게 해야 할지...

변수형은 모두 Integer 형 맞습니다.

에러 내용은 kor_tot,eng_tot를 찾지 못한다고 나옵니다.

참고로 엑세스 사용하고 있습니다.

부디 해결을...



1  COMMENTS
  • Profile
    최성진 2001.11.23 04:18
    adoquery2.ExecSQL; ===> > adoquery2.Open;

    바꾸어주세요



    ExecSQL ==> update, insert, delete



    Open ==> select









    초보 wrote:

    > 쉽게 될듯 싶은데 안되네요...

    > 쿼리에서 값을 불러와서 변수에 넣는 건데 필드의 합을 불러오니까 잘 안되네요...

    > var tot1,tot2 : Integer;

    > begin

    > adoquery2.Close;

    > adoquery2.SQL.Clear;

    > adoquery2.SQL.Add('select sum(kor) as kor_tot, sum(eng) as eng_tot from jumsu');

    > adoquery2.ExecSQL;

    >

    > tot1 := adoquery2.FieldByName('kor_tot').AsInteger; --> 에러나는 부분

    > tot2 := adoquery2.FieldByName('eng_tot').AsInteger; --> 에러나는 부분

    > end;

    >

    > 쿼리 그대로 엑세스에서 돌리면 잘 돌아갑니다.

    > 그리고 에러나는 두줄 삭제하면 이상 없습니다.

    > tot1, tot2에 값을 넣어 주는게 잘못된거 같은데 어떻게 해야 할지...

    > 변수형은 모두 Integer 형 맞습니다.

    > 에러 내용은 kor_tot,eng_tot를 찾지 못한다고 나옵니다.

    > 참고로 엑세스 사용하고 있습니다.

    > 부디 해결을...

    >