Session Cookie ASP.Net

<%@ Page Language=VB Debug=true %>

Sub Page_Load(ByVal Sender as Object, ByVal E as EventArgs)
    Dim I as Integer
    lblMessage.Text = "All Application variables:
"
    For I = 0 to Application.Count - 1
        lblMessage.Text = lblMessage.Text _
            & Application.GetKey(I) & ": " _
            & Application(I) & "
"
    Next
End Sub



Application Variables


    id="lblMessage" 
    font-size="12pt"
    font-name="Tahoma"
    runat="server"
    text="Please provide your name."
/>