델파이초보 wrote:

> * 사용환경 : 델파이5 / Windows 2000

>

> adoconnection, adoquery, datasource, dbgrid를 이용해서

> form1의 edit1.text에서 테이블명을 받아 그 결과를 form3이 뜨면서 보여주려 합니다.

> 폼 3의 코딩은 다음과 같이 하였습니다.

>

> procedure TForm3.FormCreate(Sender: TObject);

> var vedit : string;

> begin

> vedit := form1.edit1.text;

> adoquery1.Close;

> adoquery1.SQL.Clear;

> adoquery1.sql.Add('select query, count(*) as su from '+vedit+'');

> adoquery1.sql.add(' group by query order by count(*) desc');

> adoquery1.open;

> end;



위의 문장을 이런식으로 바꿔보시죠 ?

With Adoquery1 Do Begin

SQL.Close;

SQL.Clear;

SQL.Text := 'Select Query, Count(*) As Su From ' + vEdit +

'Group by Query ' +

'Order by Count(*) Desc ';

Open;

End;



물론 위의 문장과 동일한 것이지만 보기에 더 깔끔할것 같은데요.

특별한 문제점은

adoquery1.sql.Add('select query, count(*) as su from '+vedit+'')

부분이 잘못된것 같아요.

참고로 위의 문장은

adoquery1.sql.Add('select query, count(*) as su from '+vedit)

이렇게 해야 맞습니다. ' '는 하나의 문자열을 만드는 것이기 때문에

뒤에 + vedit만 하면됩니다.

> procedure TForm3.FormCreate(Sender: TObject);

> var vedit : string;

> begin

> vedit := form1.edit1.text;

> adoquery1.Close;

> adoquery1.SQL.Clear;

> adoquery1.sql.Add('select query, count(*) as su from '+vedit+'');

> adoquery1.sql.add(' group by query order by count(*) desc');

> adoquery1.open;

> end;

>

> 에러 메세지는 다음과 같습니다..

> project project1.exe raised exception class EOleException with message 'incorrect syntax near the keyword 'group'. process stopped. use step or run to continue.



The message looks like you can't use aggregate field

in your "order by" clause.



Try this way

group by query order by 2 <-- your aggregate field index#.

This works on interbase but I'm not sure what db you're using.

허춘 wrote:

> > procedure TForm3.FormCreate(Sender: TObject);

> > var vedit : string;

> > begin

> > vedit := form1.edit1.text;

> > adoquery1.Close;

> > adoquery1.SQL.Clear;

> > adoquery1.sql.Add('select query, count(*) as su from '+vedit+'');

> > adoquery1.sql.add(' group by query order by count(*) desc');

> > adoquery1.open;

> > end;

> >

> > 에러 메세지는 다음과 같습니다..

> > project project1.exe raised exception class EOleException with message 'incorrect syntax near the keyword 'group'. process stopped. use step or run to continue.

>

> The message looks like you can't use aggregate field

> in your "order by" clause.

>

> Try this way

> group by query order by 2 <-- your aggregate field index#.

> This works on interbase but I'm not sure what db you're using.



답변을 주셔서 감사합니다..

제가 쓰는 db는 sql7.0입니다...

저는 from절의 table명을 form1의 edit창에서 받은 string을 변수로 받아 처리하려 합니다. 정말 어찌해야할지 모르겠습니다..(ㅠㅠ)