<%@ Page Language="vb" %>
Sub Page_Load()
Application.Clear()
Application.Item("foo") = "foo"
Application.Item("foo2") = "foo2"
Message.Text = Application.Item("foo") & "
"
Message.Text &= Application.Item(1)
End Sub