procedure Tmainform.insertcheck (var check:TCheckBox;field:string);
begin
if check.Checked then
with datamd.qry do
begin
close;
sql.Clear ;
sql.Add('update 制作說明書 set field=1 ');
sql.Add('where 訂單編號=:dd') ;
Parameters.ParamByName('dd').Value:=did.Text ;
ExecSQL ;
end ;
end;調用時 insertcheck (ks,'卡身');是不對的,
另外一種是直接輸入是對的,
是不是我定義參量錯了。 procedure Tmainform.insertcheck (var check:TCheckBox;field:string);
begin
if check.Checked then
with datamd.qry do
begin
close;
sql.Clear ;
sql.Add('update 制作說明書 set 卡身=1 '); //隻是這裡不同
sql.Add('where 訂單編號=:dd') ;
Parameters.ParamByName('dd').Value:=did.Text ;
ExecSQL ;
end ;
end;
解决方案 »
- 用IdMultipartFormData上传文件后文件变大
- 向一个表插入几条记录
- SQL数据库的问题:
- 帮我解决一个小学一年级的问题
- 关于字符串处理的问题,如何替换字符串中的字符,如'2003/08/07'->'2003-08-07',高分在线等待!!!
- 写DLL时遇到的问题,请高手帮忙!
- 简单数据库问题
- 请问各位大侠,动态生成的主菜单,它的点击事件在什么地方写?
- 如何把Field结构相同的两个DataSet里面的数据合并?
- 有两台sql server2000数据库服务器a和b(有固定ip地址,不在一起),我希望在应用程序里点个按钮,然后就把a里的一些数据传到b里,怎么做
- 刚才回寝室把代码拿回来了 我要毕业了做了一个学生管理系统 有个像OFFICE2000那样的启动画面 在自己机器上好用可拿到别人机器上 就只能出
- delphi7程序移植到windows7时报错
sql.Add('update 制作說明書 set' + field + '=1 ');OK!!
sql.Add('update 制作說明書 set :f=1 ');
sql.Add('where 訂單編號=:dd') ;
Parameters.ParamByName('f').Asstring:=field ;
....
-------------------------------
Microsoft OLE DB Provider for SQL Server 错误 '80040e31' 超时已过期 /Expert/reply.asp,行105
sql.Add('update 制作說明書 set ' + field + '=1 ');
sql.Add('update 制作說明書 set ' + field + '=1'); //set 后面要有空格
Sql.Add('update 制作說明書 set '+field+'=1 ');
Sql.Add('update 制作說明書 set '+field+'= '''+did.text+'''');