<% Option Explicit %>
<html>
<head>
<title>ThaiCreate.Com ASP Session Object</title>
</head>
<body>
<%
Session.TimeOut = 20
Session("SiteName") = "www.ThaiCreate.Com"
Session("Creator") = "Mr.Weerachai Nukitram"
Session("Version") = "2008"
Dim List
For Each List In Session.Contents
Response.write List &" = " &Session.Contents(List) & "<br>"
Next
%>
</body>
</html>