各位的分布式系统中,有没有专门的关于事务管理的模块,我看了书也不是很懂,希望大虾们能通过自己的经验讲讲!最好带一详细的源码,谢谢!
解决方案 »
- 线程池
- delphi 请问DrowTo中的参数各个分别代表什么意思?
- 如何定位字串在主串中的第N次出现的位置?
- 自定义的TObject的对象内使用Timer组件,为何不能触发Ontimer事件?? (内附完整代码) 谢谢
- 怎样使得某段程序,一天或更长时间自动执行一次??
- 求教:如何通过button实现webbrower的上移下移及翻页?(sendmessage?)
- 怎么样将自己的程序最小化到右边的状态栏上面?
- 人穷的时候,http://www.zsgt.8u8.com/gushi.htm,别进来,因为只有标题。
- 碰见鹏鹏(水园里资助过偶),颇有感慨,千金散尽还复来,高手低手都来,牛虻愿与结交//牛虻
- *****控件数组何处寻?*****
- delhpi连SQL数据库怎么连??具体点,谢了。
- 如何用delphi加密并压缩ACCESS数据库?
delphi自带的例子??demo下面的哪个??to ljmanage(过客) :
是否ADO那本,我还是不太懂,兄台能否讲讲呢?最好结合你开发的项目,谢了!
function TCardDataModule.ExecTrans(SqlStrs: array of String): Boolean;
var
i: Integer;
RetValue: Boolean;
begin
RetValue:= true;
adoCon.BeginTrans;//开始事务处理
try
for i:= Low(SqlStrs) to High(SqlStrs) do
begin
adoqCom.SQL.Clear;
adoqCom.SQL.Add(SqlStrs[i]);
adoqCom.ExecSQL;
end;
adoCon.CommitTrans; //提交事务
except
adoCon.RollbackTrans;//如果有错误回滚
RetValue:= false;
end;
Result:= RetValue;
end;
我写的一个ADO事务处理的函数,呢自己看看吧adoCom为一个TAdoQuery;
还有,我通过问别人结合看书,怎么发现又有这么一种说法,说MTS已经提供了事物处理的功能,不用单独写关于事务管理的模块,是否有这回事?头大!!
希望,各位说说看!