http://www.devguru.com/Technologie [...] trans.html
.beginTrans retourne un long correspondant au niveau de transaction.
Donc il te suffit de faire :
dim lvl
lvl = cnx.beginTrans
cnx.commitTrans(lvl)
if lvl > 1 then
MsgBox("Il y a une transaction en cours" )
else
MsgBox("Il n'y a plus de transaction en cours" )
end if |
C'est assez porc, mais il semble que ce soit la seule méthode "presque pas trop sale".
Le mieu étant de stocker les valeures retournées par beginTrans dans une pile, et de regarder l'état de ta pile.
Message édité par MagicBuzz le 01-05-2003 à 17:17:53