多个TADOConnections的错误

时间:2013-02-19 08:46:07

标签: sql-server delphi ado

我已经找出了使用ADO和SQL Server以及与一个数据库的不同连接的显示表错误。 (详见BUG #1

尝试删除记录时出现了另一个问题

代码就像这样

function resettable (tablename, databasename, servername) : Boolean;
var
  aADOQuery : TADOQuery;
  aADOConnection : TAdoConnection,
begin
  ///  Create ADO stuff 
  aADOQuery := TADOQuery.Create;
  aADOConnection := TAdoConnection.Create;

  ///  connect to DB & Table 
  ....
  ///

  aADOQuery.sql.add('delete * from ' + Tablename;
  aADOQuery.execsql;

  ///   free objects after use  
  ....
end;

ADOConnection单独存在于数据库中时,此代码可以正常工作。如果任何其他ADO连接存在某些活动并进行了一些修改,则代码将失败,而“数据库未更新错误消息”

如何创建一个解决方案,它将在删除记录语句之前进行更新???

0 个答案:

没有答案