代码如下
Sql:='select max(code) as m from table';
ADOQuery1.Close;
ADOQuery1.sql.text:=sql;
ADOQuery1.open;
nMax:=ADOQuery1.fieldbyname('m').asString;Sql:='insert into table(code,name) values('+inttostr(nMax)+','+name+')';
ADOQuery1.Close;
ADOQuery1.sql.text:=sql;
ADOQuery1.open;执行后报异常:参数'dsdd'(name的值).....具体的记不清了
这段代码会有问题吗?
Sql:='select max(code) as m from table';
ADOQuery1.Close;
ADOQuery1.sql.text:=sql;
ADOQuery1.open;
nMax:=ADOQuery1.fieldbyname('m').asString;Sql:='insert into table(code,name) values('+inttostr(nMax)+','+name+')';
ADOQuery1.Close;
ADOQuery1.sql.text:=sql;
ADOQuery1.open;执行后报异常:参数'dsdd'(name的值).....具体的记不清了
这段代码会有问题吗?
解决方案 »
- 有生存中文桌面快捷方式的打包程序吗?
- Sender,self代表什么,什么时候用
- 请求多线程的例子!!
- 寻求Delphi里面解析regular expression的函数!类似php或者perl里面的解析函数的样子。。。。
- Pchar类型的指针和 Pointer类型的指针有什么异同????————在线等待!!!!
- dbgrid 怎么样做更新啊.
- 局域网通信问题 [在线]
- 高手请进
- 在线请求援助,100分相送,急,急,急,!!!制作安装程序,是Dbase数据库的!!!
- 使用adoquery1进行增数据时出现的问题。求助BUG啊
- 登陆问题?在线等。。解决就给分
- 求教 CxGrid如何控制每行颜色?
---》
改成
Sql:='insert into table(code,name) values('+inttostr(nMax)+','''+name+''')';
------------------------
nMax:=ADOQuery1.fieldbyname('m').asString;
---------->
改成
nMax:=ADOQuery1.fieldbyname('m').asInteger;
ADOQuery1.Close;
ADOQuery1.sql.text:=sql;
ADOQuery1.open;
nMax:=ADOQuery1.fieldbyname('m').asInteger;Sql:='insert into table(code,name) values('+inttostr(nMax)+','''+name+''')';
ADOQuery1.Close;
ADOQuery1.sql.text:=sql;
ADOQuery1.ExecSQL;一般在使用SQL语句进行插入或者修改,删除记录的时候使用ExecSQL 而不使用Open
ADOQuery1.Close;
ADOQuery1.sql.text:=sql;
ADOQuery1.open;
nMax:=ADOQuery1.fieldbyname('m').asInteger;Sql:='insert into table(code,name) values('+inttostr(nMax)+','''+name+''')';
ADOQuery1.Close;
ADOQuery1.sql.clear;
ADOQuery1.sql.text:=sql;
ADOQuery1.ExecSQL;一般在使用SQL语句进行插入或者修改,删除记录的时候使用ExecSQL 而不使用Open