请看看我在delphi中构造的sql是否有问题。谢谢。

[ice_sun]

procedure Tcjzj_ws.Button1Click(Sender: TObject);
var
i,j,sql:string;
begin

i:=query1.fieldbyname('测试成绩').asstring;
j:=query1.fieldbyname('编号').asstring;
updatesql1.ModifySQL.Clear;
sql:='update append_xx.db set cscj='+'"'+i+'"'+' where dabh='+'"'+j+'"';

updatesql1.ModifySQL.Add(sql);



updatesql1.ExecSQL(ukModify);

end;

[hcm0790]

sql:='update append_xx.db set cscj='+quotedstr(i)+' where dabh='+quotedstr(j);

[linx88]

sql:='update append_xx.db set cscj='+''''+i+''''+' where dabh='+''''+j+'''';

[chao_jian]

sql:='update append_xx.db set cscj='''+i+''' where dabh='''+j+'''';
如果cscj和dabh是整型可改成：
sql:='update append_xx.db set cscj='+i+' where dabh='+j;

注：i，j须为String型

[qifeng]

是 Access数据库，对
是 MS SQL Sever 数据库，不对。
sql:='update append_xx.db set cscj='+''''+i+''''+' where dabh='+''''+j+'''';
不是双引号，是两个单引号

[chao_jian]

sql:='update append_xx.db set cscj='''+i+''' where dabh='''+j+'''';
如果cscj和dabh是整型，可改成：
sql:='update append_xx.db set cscj='+i+' where dabh='+j;

[tccb]

sql:='update append_xx.db set cscj='+''''+i+''''+' where dabh='+''''+j+'''';