fare:=adoq.fieldbyname('farecode').asstring; for i := 0 to afarelist.Count - 1 do
begin
sqlcolumnname := sqlcolumnname + ', sum([' + afarelist[i] + ']) as [' + afarelist[i] + ']';
if afarelist[i]=fare then
sqlcolumnvalue := sqlcolumnvalue + ' ,[' + afarelist[i] + '] = sum(payment) '
else
sqlcolumnvalue := sqlcolumnvalue + ' ,[' + afarelist[i] + '] = 0 ';
end; sqltext := 'select personcode as [姓名] '
+ sqlcolumnname + ' from (select personcode '
+ sqlcolumnvalue + ' from contract where farecode like '''
+ gathertype + '%'' group by personcode,farecode ) t1 group by personcode '; showmessage(sqltext); with AdoqGather do
begin
Close; Sql.Text := sqltext;
Open;
end;
adoq.Free;
end;错误提示是“参数[121]没有默认值” 怎么会这样?
语句出错在“sqlcolumnname := sqlcolumnname + ', sum([' + afarelist[i] + ']) as [' + afarelist[i]”这句
请各位大哥帮忙
我用的数据库是ACCESS
begin
sqlcolumnname := sqlcolumnname + ', sum([' + afarelist[i] + ']) as [' + afarelist[i] + ']';
if afarelist[i]=fare then
sqlcolumnvalue := sqlcolumnvalue + ' ,[' + afarelist[i] + '] = sum(payment) '
else
sqlcolumnvalue := sqlcolumnvalue + ' ,[' + afarelist[i] + '] = 0 ';
end; sqltext := 'select personcode as [姓名] '
+ sqlcolumnname + ' from (select personcode '
+ sqlcolumnvalue + ' from contract where farecode like '''
+ gathertype + '%'' group by personcode,farecode ) t1 group by personcode '; showmessage(sqltext); with AdoqGather do
begin
Close; Sql.Text := sqltext;
Open;
end;
adoq.Free;
end;错误提示是“参数[121]没有默认值” 怎么会这样?
语句出错在“sqlcolumnname := sqlcolumnname + ', sum([' + afarelist[i] + ']) as [' + afarelist[i]”这句
请各位大哥帮忙
我用的数据库是ACCESS
解决方案 »
- 高手请指教一下,在windows7下SQL monitor跟踪不到SQL脚本!!!
- 请问QUERY是不是不能处理bigint型的字段啊,我Query的结果中找不到bigint字段啊?
- 通过类名创建窗体
- datetime的最小值是多少
- 如何找到 DateTimerPicker 组件
- 哪位大哥用过fastreport4得 Endless page height这个设置,能说一下他的用途,支持中文报表有已知的bug吗?
- 为什么我运行了一次delphi的程序后,文件会被locked?
- 如何在运行时判断一个动态文件目录是否存在,不存在则创建
- 关于handle的问题!
- 统计一下各位前辈的开发工具,请不吝赐教!!
- 用dbExpress连接SQL Server数据库时,连接不上?
- 奇怪的问题
sqltext := 'select personcode as [姓名] '
+ sqlcolumnname + ' from (select personcode '
+ sqlcolumnvalue + ' from contract where farecode like '''
+ gathertype + '%'' group by personcode,farecode ) t1 group by personcode ';
执行到在这里的时候select语句是这样的:select personcode as[姓名],sum([121]) as [121],sum([122]) as [122],sum([123]) as [123],sum([124]) as [124],sum([125]) as [125],sum([126]) as [126] from (select personcode,[121]=0,[122]=0,[123]=0,[124]=0,[125]=0,[126]=0 from contract where farecode like '12%' group by personcode,farecode) group by personcode