為什么我的里層事務嵌套無效？
雖然使用多層事務會讓我們的數據控制能力大大提高，但只能最多使用五層嵌套事務：
Dim con As ADODB.Connection 
Dim iLevel As Integer 
Set con = New ADODB.Connection 
con.CursorLocation = adUseClient 
con.Open "Provider=Microsoft.Jet.OLEDB.4.0;" _ 
& "Data Source=NWind.mdb;" 
con.BeginTrans 
' 改動 1 
con.BeginTrans 
' 改動 2 
con.BeginTrans 
' 改動 3 
iLevel = con.BeginTrans 
' 改動 4 
MsgBox "Level " & iLevel 
con.CommitTrans 
con.RollbackTrans 
con.CommitTrans 
con.CommitTrans 
con.Close 
Set con = Nothing 
可以看到，在上面這個例子中，改動1和2將成功，改動3和4無效。改動4表面上已經被提交，但由于第三層事務回退，從而導致所有它里面的事務都被回退。