Code: Select all
MSTransaction.AddConnection(MSConnection);
MSTransaction.StartTransaction;
if MSTransaction.Active
then begin
with MSQuery do
begin
LockTable(ltExclusive);
RefreshRecord;
Append;
...
Post;
RefreshRecord;
end;
MSTransaction.Commit;
MSTransaction.RemoveConnection(MSConnection);
end
else begin
MSTransaction.RemoveConnection(MSConnection);
end;
Version Info: SDAC 4.80.0.58, RAD Studio 2007 Version 11.0.2902.10471, SQL Server 2008 R2 10.50.1600.1
Do you have any suggestions.
Regards
k&k