<%@ Page Language="vb" %>
<html>
<head>
<script runat="server">
Sub Page_Load()
Application.RemoveAll()
Application.Set("TotallyNewVariable","Test!")
Message.Text = "First: " + Application("TotallyNewVariable") + "<br/>"
Application.Set("TotallyNewVariable","Test again!")
Message.Text = Message.Text & "First after Set: " + _
Application("TotallyNewVariable") + "<br/>"
End Sub
</script>
</head>
<body>
<asp:label id="Message" runat="server"/>
</body>
</html>
|