EntryWrittenEventArgs.Entry Propriété

public:
 property System::Diagnostics::EventLogEntry ^ Entry { System::Diagnostics::EventLogEntry ^ get(); };

public System.Diagnostics.EventLogEntry Entry { get; }

member this.Entry : System.Diagnostics.EventLogEntry

Public ReadOnly Property Entry As EventLogEntry

Valeur de propriété

EventLogEntry représentant l'entrée écrite dans le journal des événements.

Exemples

L’exemple suivant suppose que vous avez déjà implémenté l’exemple dans EntryWrittenEventArgs(EventLogEntry).

Il crée un objet personnalisé EventLog et y écrit une entrée. Ensuite, il crée un EntryWrittenEventArgs objet à l’aide de la première entrée dans le journal d’événements personnalisé. Cet objet est utilisé pour notifier un message.

void MyOnEntry( Object^ source, EntryWrittenEventArgs^ e )
{
   EventLogEntry^ myEventLogEntry = e->Entry;
   if ( myEventLogEntry )
   {
      Console::WriteLine( "Current message entry is: '{0}'", myEventLogEntry->Message );
   }
   else
   {
      Console::WriteLine( "The current entry is null" );
   }
}

protected static void MyOnEntry(Object source, EntryWrittenEventArgs e)
{
    EventLogEntry myEventLogEntry = e.Entry;
    if (myEventLogEntry != null)
    {
        Console.WriteLine("Current message entry is: '"
                          + myEventLogEntry.Message + "'");
    }
    else
    {
        Console.WriteLine("The current entry is null");
    }
}

Protected Shared Sub MyOnEntry(source As Object, e As EntryWrittenEventArgs)
   Dim myEventLogEntry As EventLogEntry = e.Entry
   If Not (myEventLogEntry Is Nothing) Then
      Console.WriteLine("Current message entry is: '" + _
                                          myEventLogEntry.Message + "'")
   Else
      Console.WriteLine("The current entry is null")
   End If
End Sub

S’applique à