小吳 VBQA 程式設計討論

請高人指點.
在這程式中, 本人是會用一個connection 來 update 兩個 database table.
我希望 update 兩個table 的時候不會被第二個client 來改這兩個table .(ATOMIC)
但是為何我使用 adoconnection.mode = adModeShareExclusive 後,
adoconnection.mode = adModeShareExclusive
adoconnection.open
adoconnection.BeginTrans
rsTable1.update
＜---- here
rsTable2.update
adoconnection.CommitTrans
在 update 兩個table 之間仍會被身第三者闖入並且update rsTable1?
Coding 如下.