dotConnect for Mailchimp Documentation
Devart.Common Namespace / MonitorEventArgs Class
Members Example

In This Topic
    MonitorEventArgs Class
    In This Topic
    Provides data for the TraceEvent event of the DbMonitor class.
    Syntax
    'Declaration
     
    Public Class MonitorEventArgs 
       Inherits System.EventArgs
    public class MonitorEventArgs : System.EventArgs 
    Remarks
    The TraceEvent event occurs when DbMonitor object is active and the monitoring application performs any SQL activity.
    Example
    The following sample shows how to enable and disable monitoring of database activity in your application.
    static void OnEvent(object sender, MonitorEventArgs e)
    {
      if (e.TracePoint==MonitorTracePoint.BeforeEvent)
      {
        Console.WriteLine("Description: " + e.Description);
        Console.WriteLine(" Extra info: " + e.ExtraInfo);
      }
    }
    
    
    [MTAThread]
    static void Main(string[] args)
    {
      MailChimpConnection mailchimpConn = new MailChimpConnection(
          "api key=8b10fe893c9732d12befe0b7d846ffcb-us10;");
      MailChimpMonitor mailchimpMonitor = new MailChimpMonitor();
      mailchimpMonitor.TraceEvent += new MonitorEventHandler(OnEvent);
      mailchimpMonitor.IsActive = true;
      MailChimpCommand mailchimpCommand = new MailChimpCommand("select count(*) from Folders",mailchimpConn);
      mailchimpConn.Open();
      Console.WriteLine(mailchimpCommand.ExecuteScalar());
      mailchimpConn.Close();
      mailchimpMonitor.TraceEvent -= new MonitorEventHandler(OnEvent);
      Console.ReadLine();
    }
    Sub OnEvent(ByVal sender As Object, ByVal e As MonitorEventArgs)
      If e.TracePoint = MonitorTracePoint.BeforeEvent Then
        Console.WriteLine("Description: " & e.Description)
        Console.WriteLine(" Extra info: " & e.ExtraInfo)
      End If
    End Sub
    
    <MTAThread()> _
    Sub Main()
      Dim mailchimpConn As MailChimpConnection = New MailChimpConnection( _
          "api key=8b10fe893c9732d12befe0b7d846ffcb-us10;")
      Dim mailchimpMonitor As MailChimpMonitor = New MailChimpMonitor
      AddHandler mailchimpMonitor.TraceEvent, AddressOf OnEvent
      mailchimpMonitor.IsActive = True
      Dim mailchimpCommand As MailChimpCommand = New MailChimpCommand("select count(*) from Folders", mailchimpConn)
      mailchimpConn.Open()
      Console.WriteLine(mailchimpCommand.ExecuteScalar())
      mailchimpConn.Close()
      RemoveHandler mailchimpMonitor.TraceEvent, AddressOf OnEvent
      Console.ReadLine()
    End Sub
    Inheritance Hierarchy

    System.Object
       System.EventArgs
          Devart.Common.MonitorEventArgs

    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