Il Visualizzatore eventi è un programma che è incluso con i sistemi operativi Microsoft. Il Visualizzatore eventi consente agli amministratori e agli utenti di monitorare eventi attraverso registri eventi. Gli eventi vengono generati quando viene rilevato un errore, ad esempio se un utente non riesce l'autenticazione. Visual Basic.NET (VB.NET) è un linguaggio di programmazione orientato agli oggetti di computer sviluppato da Microsoft. VB.NET è comunemente utilizzato per la sua flessibilità e facilità d'uso. In pochi passi è possibile scrivere codice VB.NET per leggere il Visualizzatore eventi nel vostro sistema.

istruzione

1 Avviare Microsoft Visual Basic Express e fare clic su "Nuovo progetto ..." nel riquadro a sinistra dello schermo. Fare doppio clic su "Applicazione Windows Form" per avviare il nuovo progetto.

2 Fare doppio clic su "Button" nel riquadro "Strumenti" per creare un nuovo pulsante. Fare doppio clic su "ListBox" nel riquadro "Strumenti" per creare un nuovo controllo casella di riepilogo. Fare doppio clic su "Button1" per aprire il modulo "Form1.vb".

3 Premere il tasto "Ctrl + A" e premere il tasto "Elimina" per eliminare tutto il codice.

4 Copia e incolla il seguente codice al modulo "Form1.vb".

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim eventLogApp come nuovo System.Diagnostics.EventLog ( "Applicazione")

Dim EventLogEntry Come System.Diagnostics.EventLogEntry

Dim eventCntr As Integer = 1

Per ogni EventLogEntry In eventLogApp.Entries

Me.ListBox1.Items.Add ( "Numero evento:" & eventCntr)

Me.ListBox1.Items.Add (eventLogEntry.EntryType.ToString)

Me.ListBox1.Items.Add (eventLogEntry.TimeGenerated.ToString)

Me.ListBox1.Items.Add (eventLogEntry.Source.ToString)

Me.ListBox1.Items.Add (eventLogEntry.Category.ToString)

Me.ListBox1.Items.Add (eventLogEntry.EventID.ToString)

Me.ListBox1.Items.Add (eventLogEntry.MachineName.ToString)

Me.ListBox1.Items.Add (eventLogEntry.Message.ToString)

Me.ListBox1.Items.Add ( "----------------------------------------- ------ ")

eventCntr = eventCntr + 1

Me.ListBox1.Refresh ()

Il prossimo

End Sub

End Class

5 Avviare il programma premendo il tasto "F5" e quindi facendo clic su "Button1" per visualizzare le voci del registro eventi attraverso una casella di riepilogo.