<%@ Page Language="VB" %>
<script runat="server">
Sub Page_Load(sender As Object, e As EventArgs)
Dim objArrList As ArrayList
Dim i As Integer
objArrList = New ArrayList
objArrList.Add("white")
objArrList.Add("black")
objArrList.Add("red")
objArrList.Add("yellow")
objArrList.Add("green")
Session("mySession") = objArrList
Me.lblText.Text = "ArrayList Created <a href=AspNetArrayListSession2.aspx>Click here</a> to view"
End Sub
</script>
<html>
<head>
<title>ThaiCreate.Com ASP.NET - ArrayList</title>
</head>
<body>
<form id="form1" runat="server">
<asp:Label id="lblText" runat="server"></asp:Label>
</form>
</body>
</html>
AspNetArrayListSession2.aspx
<%@ Page Language="VB" %>
<script runat="server">
Sub Page_Load(sender As Object, e As EventArgs)
Dim objArrList As ArrayList
Dim i As Integer
objArrList = Ctype(Session("mySession"),ArrayList)
For i = 0 To objArrList.Count - 1
Me.lblText.Text = Me.lblText.Text & objArrList(i) & "<br>"
Next
End Sub
</script>
<html>
<head>
<title>ThaiCreate.Com ASP.NET - ArrayList</title>
</head>
<body>
<form id="form1" runat="server">
<asp:Label id="lblText" runat="server"></asp:Label>
</form>
</body>
</html>