devxlogo

LogEvent – Logging an error/event to the Windows NT/2000 Application Event Log

LogEvent – Logging an error/event to the Windows NT/2000 Application Event Log

' Log an error/event to the Windows NT/2000 Application Event Log.' Usage: LogEvent("Message here", EventLogEntryType.Information)Sub LogEvent(ByVal message As String, ByVal entryType As EventLogEntryType)    If EventLog.SourceExists(Application.ProductName) = False Then        EventLog.CreateEventSource(Application.ProductName, "Application")    End If    EventLog.WriteEntry(Application.ProductName, message, entryType)End Sub' This code is taken from Marco Bellinaso's and Kevin Hoffman's "ASP.NET ' Website Programming - VB.NET edition" (Wrox Press). You can read two entire ' sample chapters of the C# edition from our Book Bank:' Chapter 4: Mantaining the site: http://www.vb2themax.com/Htmldoc.asp?File=/' Books/AspnetWebsite/AspNetWebSite_04.htm' Chapter 11: Deploying the Site: http://www.vb2themax.com/HtmlDoc.asp?Table=' Books&ID=7800

devx-admin

Share the Post: