怎么避免ADO错误：无法为更新行集定位，一些值可能在最后读取后改变？

Question

?? 我这里是DELPHI6，怎么安装补丁？ 好像没有D6关于ADO的补丁。
能不能告诉我一个网络地址？

Answer 1

我用了一个愚蠢的办法,  Table.close; Table.open;    
没有别的办法, 实在郁闷.

Answer 2

在BEFORE POST事件中加入ChangeUpdateMode(MyAdoDataSetTable);
function TMainForm.ChangeUpdateMode(ds_:TADODataSet):Boolean;
var
 I     : Integer;
 pty   : Property_;
 rs_   : _RecordSet;
 pties : Properties;
begin
 try
  rs_:=ds_.Recordset;
  pties:=rs_.Properties;
  for I:=0 to pties.Count-1 do
  begin
   pty:=pties.Item[I];
   if (pty.Name='Update Criteria') then
    pty.Value:=$00000000;
  end;
  result:=True;
 except
  Result:=False;
 end;
 Result:=True;
end;

Answer 3

如果是ADOQuery等其它ADO數據集，你隻要修改一下代碼就可以，最好在一個多態！或直接以DataSet作為參數。：）