'Declaration Public Event TransactionStateChanged As TransactionStateChangedEventHandler
public event TransactionStateChangedEventHandler TransactionStateChanged
'Declaration Public Event TransactionStateChanged As TransactionStateChangedEventHandler
public event TransactionStateChangedEventHandler TransactionStateChanged
ExactTargetConnection connection = new ExactTargetConnection( "user=MyCompanyAdmin;password=mypassword;url=https://webservice.s7.exacttarget.com/Service.asmx;"); connection.TransactionStateChanged += new TransactionStateChangedEventHandler(connection_TransactionStateChanged); connection.TransactionStateChanging += new TransactionStateChangingEventHandler(connection_TransactionStateChanging); connection.Open(); // ... ExactTargetTransaction 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 ExactTargetConnection( _ "user=MyCompanyAdmin;password=mypassword;url=https://webservice.s7.exacttarget.com/Service.asmx;") AddHandler connection.TransactionStateChanged, New TransactionStateChangedEventHandler(AddressOf &_ Me.connection_TransactionStateChanged) AddHandler connection.TransactionStateChanging, New TransactionStateChangingEventHandler(AddressOf &_ Me.connection_TransactionStateChanging) connection.Open() '... Dim Transaction As ExactTargetTransaction 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
Target Platforms: Windows 7, Windows Vista SP1 or later, Windows XP SP3, Windows Server 2008 (Server Core not supported), Windows Server 2008 R2 (Server Core supported with SP1 or later), Windows Server 2003 SP2