<%@ Page Language="vb" %><%@ Page Language="vb" %><html> <head> <script runat="server"> Sub Page_Load() Dim Key As String Message.Text = "Session Keys:" For Each Key in Session.Keys Message.Text &= "</br>Key: " & Key Message.Text &= "</br>Value: " & Session(Key) Next End Sub </script> </head><body> <asp:label id="Message" runat="server"/></body></html>