Reading the WindowsNT / Windows 2000 EventLog in VB.NET
Reading the WindowsNT / Windows 2000 EventLog in VB.NET
Rate Reading the WindowsNT / Windows 2000 EventLog in VB.NET
(1(1 Vote))
Protected Sub Button1_Click(ByVal sender As Object, _
ByVal e As System.EventArgs)
Dim a As New EventLog()
Dim objEventLog As EventLog.EventLogEntryCollection
Dim objEntry As EventLogEntry
a.Log = "Application"
objeventlog = a.Entries()
For Each objEntry In objEventLog
Textbox1.Text += (objentry.Source & ":" & _
objEntry.TimeGenerated & ":" & _
objEntry.Message) & chr(13) & chr(10)
Next
End Sub
Reading the WindowsNT / Windows 2000 EventLog in VB.NET Comments
No comments yet — be the first to post one!
Post a Comment