程序与存储过程的事务控制问题？(50分)

例如：
存储过程：
Begin Tran
Insert into table1 values('1', '32423')
Insert Into Table1 Values('2', 'sdkfsd')
rollback Tran
程序：
query1.database.Starttransact;
query1.Applyupdates;
query1.database.commit;

运行出错？
请教诸位DFW如何处理这样的事务。

存储过程：
Begin Tran a
Insert into table1(field1,field2) values('1', '32423')
Insert Into Table1 (field1,field2) Values('2', 'sdkfsd')
rollback Tran a

关注

多人接受答案了。