Question

delphi ADOQuery1 怎么更新数据

ADOQuery1.SQL.Clear;
showmessage(File_Feature);
sql:= 'select * from MediaInfo where 特征="'+File_Feature+'"';
ADOQuery1.SQL.Add(sql);
ADOQuery1.Open;

if not ADOQuery1.IsEmpty then
begin
ADOQuery1.SQL.Clear;
sql:='update MediaInfo set 时间="'+'1as'+'"';
ADOQuery1.SQL.Add(sql);
ADOQuery1.ExecSQL;

exit;
end;

返回结果应该只有一行 但是实际更新了所有字段

Answer 1

ADOQuery1.SQL.Clear;
showmessage(File_Feature);
sql:= 'select * from MediaInfo where 特征="'+File_Feature+'"';
ADOQuery1.SQL.Add(sql);
ADOQuery1.Open;

if ADOQuery1.recordCount>0 then
begin
while not ADOQuery1.eof do
begin
ADOQuery1.edit;
ADOQuery1.fieldByname('时间').value:=‘1as’;
ADOQuery1.post;
ADOQuery1.next;
end;

end;

或者干脆直接点
ADOQuery1.SQL.Clear;
sql:= 'update MediaInfo set 时间='''+'1as'+'''+where 特征="'+File_Feature+'"';
ADOQuery1.SQL.Add(sql);
ADOQuery1.execsql;

Answer 2

查询没意义，更新语句是更新所有时间，更新语句里把第一个查询的条件加上就行了

Answer 3

您好,你要加条件更新,你这样写肯定会更新所有记录的.
update tablename set fieldname = values Where Masterkey = key