Mega Code Archive

 

Categories / ASP.Net Tutorial / Development

 

HttpContext (VB)

Imports Microsoft.VisualBasic Imports System.Web Public Class AppendMessage     Implements IHttpModule     Dim WithEvents _application As HttpApplication = Nothing     Public Overridable Sub Init(ByVal context As HttpApplication) _             Implements IHttpModule.Init         _application = context     End Sub     Public Overridable Sub Dispose() Implements IHttpModule.Dispose     End Sub     Public Sub context_PreSendRequestContent(ByVal sender As Object, _             ByVal e As EventArgs) Handles _application.PreSendRequestContent         Dim message As String = "<!-- This page has been post processed at " & _                                 System.DateTime.Now.ToString() & _                                 " by a custom HttpModule.-->"         _application.Context.Response.Output.Write(message)     End Sub End Class File: Web.config   <configuration>     <system.web>       <httpModules>         <add name="AppendMessage" type="AppendMessage, App_code" />       </httpModules>     </system.web> </configuration>