ADO+ACCESS的SQL，解决立刻结贴；

Question

with ADOQuery1 do begin
  ADOQuery1.SQL.Clear;
  ADOQuery1.SQL.Add('update ckdb set xm=未知 where xm=“”');
  ADOquery1.Prepared;
  ADOquery1.ExecSQL;
  end;
上面的不对
******************************************
将xm字段为空的记录改为：未知
？？？

Answer 1

with ADOQuery1 do begin
  ADOQuery1.SQL.Clear;
  ADOQuery1.SQL.Add('update ckdb set xm=''未知'' where xm=''''');
  ADOquery1.Prepared;
  ADOquery1.ExecSQL;
  end;
两个''表示一个'

Answer 2

同意楼上的
例如 字符类型的变量
  xm:string;
with ADOQuery1 do begin
  ADOQuery1.SQL.Clear;
 ADOQuery1.SQL.Add('update ckdb set xm='''+xm+''''+'where xm=''''');
  ADOquery1.Prepared;
  ADOquery1.ExecSQL;
  end;

Answer 3

MARK~经鉴定!楼上的两位答案正确!楼主可以结贴了！

Answer 4

试试这样，同样可以达到你的要求：
with ADOQuery1 do begin
  ADOQuery1.SQL.Clear;
  ADOQuery1.SQL.Add('update ckdb set xm=未知 where xm= :aa ');
  ADOQuery1.Parameters.ParamByName('aa').value:='';
  ADOquery1.Prepared;
  ADOquery1.ExecSQL;
  end;

Answer 5

dim sqlstr as string 
sqlstr='update ckdb set xm:=" + 未知 + ' where xm=: '+aa with ADOQuery1 do begin
  ADOQuery1.SQL.Clear;
  ADOQuery1.SQL.Add()sqlatr
  ADOQuery1.Parameters.ParamByName('aa').value:='';
  ADOquery1.Prepared;
  ADOquery1.ExecSQL;
  end;

Answer 6

还是用变参好，呵呵
-------------------------------------------------
论坛正在升级中，有时可能会出现连接错误，请见凉的现像，只要稍后再登录就可以解决
==================================================如果您觉的您对Delphi感兴趣或是很想学的更好些或者是对Delphi有更深的认识，我们可以一起交流；
呵呵
www.nxrs.net/bbs
谢谢，别抛砖