Response ASP.Net

<%@ Page Language="vb" %>

   
      Cacheing Output in ASP.NET
      
         Sub Page_Load()
            Response.CacheControl = "Public"
            Response.ExpiresAbsolute = DateTime.Now.AddSeconds(30)
            Message.Text = Now.ToString()
         End Sub