我想用以下SQL语句,将表clsoder中,凡是其中course,course_id,textbook,edittion,author,publisher六个字段相同的记录汇总成一条,并添加至另一表(texlist)中,(六个字段相同的记录不相同的也一起添加至).
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
F_DM2.ClientDataSet1.Close;
F_DM2.ClientDataSet1.CommandText:= select id,class_id,class_master,class_name,course,course_id,textbook,edittion,
author,publisher,sum(txtnum) as txtno ,sum(exercisenum) as texno,sum(revi_filenum) as trevno into texlist
from clsoder group by id,class_id,class_master,class_name,course,course_id,textbook,edittion,
author,publisher;
F_DM2.ClientDataSet1.Excute;
F_DM2.ClientDataSet1.Open;
F_DM2.ClientDataSet1.Refresh;
end;
end.
以上出错:undeclared identitfier:'select'。难道select语句也要声明?
请高手帮修改一下。非常感谢!
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
F_DM2.ClientDataSet1.Close;
F_DM2.ClientDataSet1.CommandText:= select id,class_id,class_master,class_name,course,course_id,textbook,edittion,
author,publisher,sum(txtnum) as txtno ,sum(exercisenum) as texno,sum(revi_filenum) as trevno into texlist
from clsoder group by id,class_id,class_master,class_name,course,course_id,textbook,edittion,
author,publisher;
F_DM2.ClientDataSet1.Excute;
F_DM2.ClientDataSet1.Open;
F_DM2.ClientDataSet1.Refresh;
end;
end.
以上出错:undeclared identitfier:'select'。难道select语句也要声明?
请高手帮修改一下。非常感谢!
例如:
F_DM2.ClientDataSet1.CommandText:= 'Select * from [TABLE_NAME]';
'select ....'
+ ' form '
+ ' .... '
+' where '
+' ...... ';
F_DM2.ClientDataSet1.Close;
F_DM2.ClientDataSet1.CommandText:= 'select id,class_id,class_master,class_name,course,course_id,textbook,edittion,author,publisher,sum(txtnum) as txtno ,sum(exercisenum) as texno,sum(revi_filenum) as trevno into texlist'
+'from clsoder group by course,course_id,textbook,edition,author,publisher';
F_DM2.ClientDataSet1.Execute;
F_DM2.ClientDataSet1.Open;
F_DM2.ClientDataSet1.Refresh;
出错提示:第一行'clsoder'附近有语法错误,请帮检查一下错误何在?谢谢!
F_DM2.ClientDataSet1.CommandText:= 'select id,class_id,class_master,class_name,course,course_id,textbook,edittion,author,publisher,sum(txtnum) as txtno ,sum(exercisenum) as texno,sum(revi_filenum) as trevno into texlist'
//----> from 左边留空格,或者 texlist 右边留空格
+'from clsoder group by course,course_id,textbook,edition,author,publisher';
+'from clsoder group by course,course_id,textbook,edition,author,publisher';在另一行上。
还是出错提示:第一行'clsoder'附近有语法错误。怎么办?请各位帮助。
F_DM2.ClientDataSet1.CommandText:='select id,class_id,class_master,class_name,course,course_id,textbook,edittion,author,publisher,sum(txtnum) as txtno ,sum(exercisenum) as texno,sum(revi_filenum) as trevno into texlist' + 'from clsoder group by course,course_id,textbook,edition,author,publisher';
快急疯了!
as trevno into texlist' + 'from clsoder group by
.........
改为
..................
as trevno into texlist ' + 'from clsoder group by
..................