求救：分布式事务已完成错误

[ShallowShrimp]

请教各路高手：

我写了一个MTS/COM+对象

原代码如下：
procedure TAObject.UpdateA;
begin
try
ADOCon.Execute('Update TimeObject Set A_Time=getdate()');
SetComplete;
except
SetAbort;
raise;
end;
MessageBox(Application.handle,'UpdateA方法执行成功！','提示',MB_OK+MB_ICONINFORMATION);
end;

事务模式为：需要事务　启用对象池，最小值为3
第一次调用成功，第二次调用出现以下错误

---------------------------
Debugger Exception Notification
---------------------------
Project ComClient.exe raised exception class EOleException with message '分布式事务已完成。请将此会话登记到新事务或 NULL 事务中。'. Process stopped. Use Step or Run to continue.
---------------------------
OK Help
---------------------------

不知道是什么原因引起的？请不吝赐教，谢谢！

[loader]

up

[ShallowShrimp]

没有人会吗？

[ShallowShrimp]

请大侠们指点啊~~~