|
<%@ Page Language="vb" %>
<html>
<head>
<script runat="server">
Sub Page_Load()
If Session.Count > 0 Then
Dim myArray As Array = Array.CreateInstance(GetType(Object), _
Session.Count)
Session.CopyTo(myArray, 0)
Message.Text = "The first item in the array is: " & myArray(0)
End If
End Sub
</script>
</head>
<body>
<form runat="server">
<asp:label id="Message" runat="server"/>
</form>
</body>
</html>
|