Mega Code Archive

 

Categories / ASP.Net Tutorial / ASP Net Instroduction

 

Log exception in Global asax (VB)

Imports System.Web Imports System.Web.SessionState Public Class Global Inherits System.Web.HttpApplication     Sub Application_Error(ByVal sender As Object, ByVal e As EventArgs)         Dim myEventLog As System.Diagnostics.EventLog         Dim ex As Exception = Server.GetLastError()         myEventLog = New System.Diagnostics.EventLog()         myEventLog.Log = "Application"         myEventLog.Source = "Default"         myEventLog.WriteEntry(ex.ToString())     End Sub End Class