<% 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"
If strObjDic.Exists("gr") Then
Response.Write("Key exists!")
Else
Response.Write("Key does not exist!")
End If
Set strObjDic = Nothing
%>
</body>
</html>
ช่วยกันสนับสนุนรักษาเว็บไซต์ความรู้แห่งนี้ไว้ด้วยการสนับสนุน 
Load balance : Server 04
