<%@ Page Language="VB" AutoEventWireup="false" CodeFile="Default.aspx.vb" Inherits="_Default" %> <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <%@ OutputCache Duration="30" VaryByParam="None" %> <html xmlns="http://www.w3.org/1999/xhtml" > <head> <title>Substitution Control</title> </head> <body> <form id="form1" runat="server"> <div> </div> </form> </body> </html> File: Default.aspx.vb Imports System.Web Partial Class _Default Inherits System.Web.UI.Page Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Response.Cache.SetCacheability(HttpCacheability.NoCache) Response.Cache.SetNoStore() Response.Cache.SetExpires(DateTime.MinValue) Response.Write(DateTime.Now.ToLongTimeString()) End Sub End Class