关于事务处理的问题,请各位进来看看,谢谢!!

[liujianghong]

有这样一个事务处理程序:
dim conn as new adodb.connection
on error resume next
conn.open strConn
conn.begin
Conn.BeginTrans
conn.execute "insert into tableAA"
do while true
conn.execute "insert into tableBB"
if 条件 then exit do
loop

if err.number=0 then
Conn.CommitTrans
else
Conn.RollbackTrans
end if

对于上面的程序,如果在循环部分出错了. 问题: 事务回滚是怎样的.是回滚当前语句还是回滚全部已执行的循环语句呢.

[liujianghong]

怎么没有人帮帮呀

[qjqmoney]

事务会回滚所有BeginTrans到RollbackTrans之间的操作。

[sunnyBelt]

是全部的。因为事物在执行的时候对数据库的更新并没有应用到数据库中去，当回滚的时候就把内存中的更改取消掉了。

[cryptonym]

回滚这么多
conn.execute "insert into tableAA"
do while true
conn.execute "insert into tableBB"
if 条件 then exit do
loop

[yoki]

你需要回滚到哪？你的是全部回滚，即只要出错那么不会插入任何纪录

部分回滚需要将事务开始及提交语句放在循环里面，如：
conn.execute "insert into tableAA"
do while true
Conn.BeginTrans
conn.execute "insert into tableBB"
if 条件 then exit do
if err.number=0 then
Conn.CommitTrans
else
Conn.RollbackTrans
end if
loop

[itlive]

当然是全部了