D
dreameast-1
Unregistered / Unconfirmed
GUEST, unregistred user!
我用adoquery组件向access数据库表中插入记录,下面的语句总提示插入语句(insert)错误,大家帮我看看到底哪里错了!!!!
with aqsldmain do
begin
close;
Sql.Clear ;
Sql.Add('Insert sld_main (inno,indate,stockperson,isyuan,moldcode,moldname,size,yuansum,bansum,chengsum,wastersum,auditingperson,isauditing,auditingdate,memo) ');
sql.Add('valuesa,:b,:c,:d,:e,:f,:g,:h,:i,:j,:k,:l,:m,:n,)');
Parameters[0].value:=trim(inno.Text);
Parameters[1].value:=indate.Date;
Parameters[2].value:=trim(inperson.Text) ;
Parameters[3].value:=sfyl.checked;
Parameters[4].value:=trim(code.Text) ;
Parameters[5].value:=trim(mname.Text) ;
Parameters[6].value:=trim(size.Text) ;
Parameters[7].value:=strtofloat(trim(ysum.Text)) ;
Parameters[8].value:=strtofloat(trim(Bsum.Text)) ;
Parameters[9].value:=strtofloat(trim(Csum.Text)) ;
Parameters[10].value:=strtofloat(trim(wsum.Text)) ;
Parameters[11].value:='' ;
Parameters[12].value:=false;
Parameters[13].value:=formatdatetime('yyyy-mm-dd',date);
Parameters[14].value:=trim(memo.text);
ExecSql;
end;
with aqsldmain do
begin
close;
Sql.Clear ;
Sql.Add('Insert sld_main (inno,indate,stockperson,isyuan,moldcode,moldname,size,yuansum,bansum,chengsum,wastersum,auditingperson,isauditing,auditingdate,memo) ');
sql.Add('valuesa,:b,:c,:d,:e,:f,:g,:h,:i,:j,:k,:l,:m,:n,)');
Parameters[0].value:=trim(inno.Text);
Parameters[1].value:=indate.Date;
Parameters[2].value:=trim(inperson.Text) ;
Parameters[3].value:=sfyl.checked;
Parameters[4].value:=trim(code.Text) ;
Parameters[5].value:=trim(mname.Text) ;
Parameters[6].value:=trim(size.Text) ;
Parameters[7].value:=strtofloat(trim(ysum.Text)) ;
Parameters[8].value:=strtofloat(trim(Bsum.Text)) ;
Parameters[9].value:=strtofloat(trim(Csum.Text)) ;
Parameters[10].value:=strtofloat(trim(wsum.Text)) ;
Parameters[11].value:='' ;
Parameters[12].value:=false;
Parameters[13].value:=formatdatetime('yyyy-mm-dd',date);
Parameters[14].value:=trim(memo.text);
ExecSql;
end;