Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Initialisiert eine neue Instanz der EntryWrittenEventArgs-Klasse mit dem angegebenen Eintrag im Ereignisprotokoll.
Namespace: System.Diagnostics
Assembly: System (in system.dll)
Syntax
'Declaration
Public Sub New ( _
entry As EventLogEntry _
)
'Usage
Dim entry As EventLogEntry
Dim instance As New EntryWrittenEventArgs(entry)
public EntryWrittenEventArgs (
EventLogEntry entry
)
public:
EntryWrittenEventArgs (
EventLogEntry^ entry
)
public EntryWrittenEventArgs (
EventLogEntry entry
)
public function EntryWrittenEventArgs (
entry : EventLogEntry
)
Parameter
- entry
Ein EventLogEntry, der den geschriebenen Eintrag darstellt.
Beispiel
Im folgenden Beispiel wird der EntryWrittenEventArgs-Konstruktor veranschaulicht. Es wird ein benutzerdefiniertes EventLog-Objekt erstellt und ein Eintrag in dieses geschrieben. Anschließend wird ein EntryWrittenEventArgs-Objekt unter Verwendung des ersten Eintrags im benutzerdefinierten EventLog erstellt. Dieses Objekt wird zum Benachrichtigen einer Meldung verwendet.
Imports System
Imports System.Diagnostics
Class MySample
Public Shared Sub Main()
Try
Dim myNewLog As New EventLog()
' Create the source if it does not exist already.
If Not EventLog.SourceExists("MySource") Then
EventLog.CreateEventSource("MySource", "MyNewLog")
Console.WriteLine("CreatingEventSource")
End If
myNewLog.Log = "MyNewLog"
myNewLog.Source = "MySource"
' Write an entry to the EventLog.
myNewLog.WriteEntry("The Latest entry in the Event Log")
Dim myEntries As Integer = myNewLog.Entries.Count
Dim entry As EventLogEntry = myNewLog.Entries(myEntries - 1)
Dim myEntryEventArgs As New EntryWrittenEventArgs(entry)
MyOnEntry(myNewLog, myEntryEventArgs)
Catch e As Exception
Console.WriteLine("Exception Raised" + e.Message)
End Try
End Sub 'Main
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 'MyOnEntry
End Class 'MySample
using System;
using System.Diagnostics;
class MySample
{
public static void Main()
{
try
{
EventLog myNewLog = new EventLog();
myNewLog.Log = "MyNewLog";
myNewLog.Source="MySource";
// Create the source if it does not exist already.
if(!EventLog.SourceExists("MySource"))
{
EventLog.CreateEventSource("MySource", "MyNewLog");
Console.WriteLine("CreatingEventSource");
}
// Write an entry to the EventLog.
myNewLog.WriteEntry("The Latest entry in the Event Log");
int myEntries = myNewLog.Entries.Count;
EventLogEntry entry =myNewLog.Entries[myEntries-1];
EntryWrittenEventArgs myEntryEventArgs=
new EntryWrittenEventArgs(entry);
MyOnEntry(myNewLog,myEntryEventArgs);
}
catch(Exception e)
{
Console.WriteLine("Exception Raised" +e.Message);
}
}
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");
}
}
}
#using <System.dll>
using namespace System;
using namespace System::Diagnostics;
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" );
}
}
int main()
{
try
{
EventLog^ myNewLog = gcnew EventLog;
myNewLog->Log = "MyNewLog";
myNewLog->Source = "MySource";
// Create the source if it does not exist already.
if ( !EventLog::SourceExists( "MySource" ) )
{
EventLog::CreateEventSource( "MySource", "MyNewLog" );
Console::WriteLine( "CreatingEventSource" );
}
// Write an entry to the EventLog.
myNewLog->WriteEntry( "The Latest entry in the Event Log" );
int myEntries = myNewLog->Entries->Count;
EventLogEntry^ entry = myNewLog->Entries[ myEntries - 1 ];
EntryWrittenEventArgs^ myEntryEventArgs = gcnew EntryWrittenEventArgs( entry );
MyOnEntry( myNewLog, myEntryEventArgs );
}
catch ( Exception^ e )
{
Console::WriteLine( "Exception Raised {0}", e->Message );
}
}
import System.*;
import System.Diagnostics.*;
class MySample
{
public static void main(String[] args)
{
try {
EventLog myNewLog = new EventLog();
myNewLog.set_Log("MyNewLog");
myNewLog.set_Source("MySource");
// Create the source if it does not exist already.
if (!(EventLog.SourceExists("MySource"))) {
EventLog.CreateEventSource("MySource", "MyNewLog");
Console.WriteLine("CreatingEventSource");
}
// Write an entry to the EventLog.
myNewLog.WriteEntry("The Latest entry in the Event Log");
int myEntries = myNewLog.get_Entries().get_Count();
EventLogEntry entry =
myNewLog.get_Entries().get_Item((myEntries - 1));
EntryWrittenEventArgs myEntryEventArgs =
new EntryWrittenEventArgs(entry);
MyOnEntry(myNewLog, myEntryEventArgs);
}
catch (System.Exception e) {
Console.WriteLine("Exception Raised" + e.get_Message());
}
} //main
protected static void MyOnEntry(Object source, EntryWrittenEventArgs e)
{
EventLogEntry myEventLogEntry = e.get_Entry();
if (myEventLogEntry != null) {
Console.WriteLine("Current message entry is: '"
+ myEventLogEntry.get_Message() + "'");
}
else {
Console.WriteLine("The current entry is null");
}
} //MyOnEntry
} //MySample
Plattformen
Windows 98, Windows 2000 SP4, Windows Server 2003, Windows XP Media Center Edition, Windows XP Professional x64 Edition, Windows XP SP2, Windows XP Starter Edition
.NET Framework unterstützt nicht alle Versionen sämtlicher Plattformen. Eine Liste der unterstützten Versionen finden Sie unter Systemanforderungen.
Versionsinformationen
.NET Framework
Unterstützt in: 2.0, 1.1, 1.0
Siehe auch
Referenz
EntryWrittenEventArgs-Klasse
EntryWrittenEventArgs-Member
System.Diagnostics-Namespace