
Partial Class OutputCachingLowLevel
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs) Handles Me.Load

        Response.Cache.SetExpires(DateTime.Now.AddSeconds(10))
        Response.Cache.SetCacheability(HttpCacheability.Public)

        lblTime.Text = String.Format("Strona została wczytana o godzinie {0}", DateTime.Now.ToLongTimeString())
        lblUserName.Text = String.Format("Nazwa użytkownika: {0}", Request.QueryString("UserName"))
        lblState.Text = String.Format("Stan: {0}", Request.QueryString("State"))

    End Sub

End Class
