<% 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"
For Each List In strObjDic.Keys
Response.write List& "<br>"
Next
Set strObjDic = Nothing
%>
</body>
</html>
ช่วยกันสนับสนุนรักษาเว็บไซต์ความรู้แห่งนี้ไว้ด้วยการสนับสนุน 
Load balance : Server 02
