<%@ Page Language="VB" %>
<script runat="server">
Sub Page_Load(sender As Object, e As EventArgs)
Session("Name") = "Mr.Weerachai Nukitram"
Session("NickName") = "Mr.Win"
Session.Add("SiteName","www.ThaiCreate.Com")
Dim items As Object
For Each items In Session.Keys
Me.lblText.Text = Me.lblText.Text & items & " = " &Session(items) & "<br>"
Next
End Sub
</script>
<html>
<head>
<title>ThaiCreate.Com ASP.NET - Session Object</title>
</head>
<body>
<form runat="server">
<asp:Label id="lblText" runat="server"></asp:Label>
</form>
</body>
</html>