'Declaration Public Event TransactionStateChanged As TransactionStateChangedEventHandler
public event TransactionStateChangedEventHandler TransactionStateChanged
'Declaration Public Event TransactionStateChanged As TransactionStateChangedEventHandler
public event TransactionStateChangedEventHandler TransactionStateChanged
DynamicsConnection connection = new DynamicsConnection( "Server=https://your_company.crm4.dynamics.com;User [email protected];Password=A123456789;"); connection.TransactionStateChanged += new TransactionStateChangedEventHandler(connection_TransactionStateChanged); connection.TransactionStateChanging += new TransactionStateChangingEventHandler(connection_TransactionStateChanging); connection.Open(); // ... DynamicsTransaction tr = connection.BeginTransaction(); // ... tr.Commit(); // ... void connection_TransactionStateChanging(object sender, TransactionStateChangingEventArgs e) { if (e.Action == TransactionAction.Commit) { // do somthing... } } void connection_TransactionStateChanged(object sender, TransactionStateChangedEventArgs e) { if (e.Action == TransactionAction.Commit) { // do somthing... } }
Dim connection As New DynamicsConnection( _ "Server=https://your_company.crm4.dynamics.com;User [email protected];Password=A123456789;") AddHandler connection.TransactionStateChanged, New TransactionStateChangedEventHandler(AddressOf &_ Me.connection_TransactionStateChanged) AddHandler connection.TransactionStateChanging, New TransactionStateChangingEventHandler(AddressOf &_ Me.connection_TransactionStateChanging) connection.Open() '... Dim Transaction As DynamicsTransaction Transaction = connection.BeginTransaction() '... Transaction.Commit() '... Private Sub connection_TransactionStateChanged(ByVal sender As Object, ByVal e As TransactionStateChangedEventArgs) If (e.Action = TransactionAction.Commit) Then '... End If End Sub Private Sub connection_TransactionStateChanging(ByVal sender As Object, ByVal e As TransactionStateChangingEventArgs) If (e.Action = TransactionAction.Commit) Then '... End If End Sub