ASP Dictionary & Session Object() อีกหนึ่งในความสามารถของ Session ที่สามารถทำการเก็บ Object ได้ครับ ตัวอย่างนี้คิดว่าจะมีประโยชน์อย่างมากสำหรับผู้ที่ต้องการใช้ Dictionary ครับ เพราะสามารถทำการส่ง Dictionary ไปกับ Session ได้เหมือนกับการเรียกภายใน Sub หรือ Function เลยครับ
Syntax
<%
Set Session("Name") = Dictionary Object
%>
ASPDictionaryObject.asp
<% Option Explicit %>
<html>
<head>
<title>ThaiCreate.Com ASP Dictionary Object</title>
</head>
<body>
<%
Dim strObjDic,List
Set strObjDic = Server.CreateObject("Scripting.Dictionary")
strObjDic.Add "re","Red"
strObjDic.Add "gr","Green"
strObjDic.Add "bl","Blue"
strObjDic.Add "pi","Pink"
Set Session("strObjectDic") = strObjDic
Response.write("Dictionary Created<br>")
Response.write("Click <a href=ASPDictionarySession.asp>here</a> to view data<br>")
Set strObjDic = Nothing
%>
</body>
</html>
ASPDictionarySession.asp
<% Option Explicit %>
<html>
<head>
<title>ThaiCreate.Com ASP Dictionary Object</title>
</head>
<body>
<%
Dim strObjDic,List
Set strObjDic = Session("strObjectDic")
For Each List In strObjDic.Keys
Response.write List& " = " & strObjDic.Item(List) & "<br>"
Next
Set strObjDic = Nothing
%>
</body>
</html>
ช่วยกันสนับสนุนรักษาเว็บไซต์ความรู้แห่งนี้ไว้ด้วยการสนับสนุน 
