IsInTransaction Method Example

Dim objContext As ObjectContext
Set objContext = GetObjectContext()

If Not objContext Is Nothing Then
    ' Find out if the object is in a transaction.
    If Not objContext.IsInTransaction Then
        ' If not, do something appropriate here.
    End If
End If