dotConnect for Mailchimp Documentation
Devart.Common Namespace / DbConnectionBase Class / TransactionStateChanged Event
Example

In This Topic
    TransactionStateChanged Event
    In This Topic
    Occurs when the state of the transaction is changed.
    Syntax
    'Declaration
     
    Public Event TransactionStateChanged As TransactionStateChangedEventHandler
    public event TransactionStateChangedEventHandler TransactionStateChanged
    Example
    This sample demonstrates how to use the TransactionStateChanged and TransactionStateChanging events.
    MailChimpConnection connection = new MailChimpConnection(
         "api key=8b10fe893c9732d12befe0b7d846ffcb-us10;");
         connection.TransactionStateChanged += new TransactionStateChangedEventHandler(connection_TransactionStateChanged);
         connection.TransactionStateChanging += new TransactionStateChangingEventHandler(connection_TransactionStateChanging);
         connection.Open();
    
         // ...
    MailChimpTransaction 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 MailChimpConnection( _
        "api key=8b10fe893c9732d12befe0b7d846ffcb-us10;")
    AddHandler connection.TransactionStateChanged, New TransactionStateChangedEventHandler(AddressOf &_ Me.connection_TransactionStateChanged)
            AddHandler connection.TransactionStateChanging, New TransactionStateChangingEventHandler(AddressOf &_ Me.connection_TransactionStateChanging)
            connection.Open()
            '...
            Dim Transaction As MailChimpTransaction
            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
    Requirements

    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

    See Also