Session Cookie ASP.Net

<%--
 Save this to  global.asax
 




   Sub Session_OnStart()
      Dim EventLog1 As New System.Diagnostics.EventLog ("Application", ".", "mySource")
      EventLog1.WriteEntry("Session_OnStart fired!")
      Context.Response.AppendToLog("Session_OnStart fired!")
   End Sub
   Sub Session_OnEnd()
      Dim EventLog1 As New System.Diagnostics.EventLog ("Application", ".", "mySource")
      EventLog1.WriteEntry("Session_OnEnd fired!")
   End Sub
   Sub Application_OnError()
      Dim EventLog1 As New System.Diagnostics.EventLog ("Application", ".", "mySource")
      EventLog1.WriteEntry("Error Occurred. Error info:" & Server.GetLastError().ToString())
   End Sub

--%>