Development ASP.Net

  1. Home
  2. ASP.Net
  3. Development
  4. HttpResponseSubstitutionCallback
<%@ Page Language="VB" AutoEventWireup="false" CodeFile="Default.aspx.vb" Inherits="Default" %>
<%@ OutputCache Duration="5" VaryByParam = "none" %>



    Untitled Page


    
    

    
    

    


File: Default.aspx.vb
Partial Class Default
    Inherits System.Web.UI.Page
    Protected Sub Page_Load(ByVal sender As Object, _
                            ByVal e As System.EventArgs) _
                            Handles Me.Load
        Response.Write("Current (cached) Time is :" & Now)
        Response.Write("
")
        Response.WriteSubstitution(New HttpResponseSubstitutionCallback(AddressOf getServerTime))
    End Sub
    Public Shared Function getServerTime(ByVal context As System.Web.HttpContext) _
       As String
        Return "Current Time is :" & Now.ToString
    End Function
End Class