ASP Cookies Object คือกลุ่มข้อมูลขนาดเล็กที่ Web Server ส่งให้จัดเก็บไว้ในฝั่งของ Client ผ่าน Web Browser และทาง Client มีหน้าที่จัดเก็บข้อมูลเหล่านี้ เพื่อ Web Server จะได้ทำการเรียกข้อมูลเหล่านี้ใช้งานได้ตลอดเวลา ข้อมูลที่ถูกจัดเก็บไว้ในรูปแบบของ Cookies จะมีอายุที่แน่นอน และจะยังคงมีชีวิตอยู่และสามารถใช้งานได้แม้ว่าจะทาง Client จะทำการปิดเครื่อง เพราะเมื่อ Client ทำการเปิดเครื่องและทำการเปิดเว็บไซต์ที่เป็นเจ้าของ Cookies นั้น ๆ ก็จะสามารถอ่านตัวแปรที่ถูกจัดเก็บอยู่ฝั่ง Client ได้ ซึ่งต่างจากตัวแปร Session ที่เมื่อทำการปิดเครื่อง หรือปิด Browser ข้อมูลที่ถูกจัดเก็บจะถูกลบทิ้งไปในทันที
- การสร้างตัวแปร Cookies (Create Cookies)
<%
Response.Cookies("Cookie-name") = Value
Response.Cookies("Cookie-name").Expires = Now + 7 '*** Or .Expires=#Oct 11,2008# ***' '*** Expire 7 Day ***'
%>
สร้างตัวแปร Cookies ที่มี Key
<%
Response.Cookies("key").Expires = Now + 7 '* Or .Expires=#Oct 11,2008# *' '* Expire 7 Day *'
Response.Cookies("key")("item1") = Value1
Response.Cookies("key")("item2") = Value2
Response.Cookies("key")("item3") = Value3
Response.Cookies("key")("item4") = Value4
%>
<%
For Each List In Request.Cookies("key")
Response.write List &" = " & Request.Cookies("key")(List) & "<br>"
Next
%>
- การลบตัวแปร Cookies (Delete Cookies)
<%
Response.Cookies("Cookie-name").Expires = Now
%>
ลบตัวแปร Cookies ที่มี Key
<%
Response.Cookies("key").Expires = Now
%>
ASPCookieObject1.asp (Create Cookies)
<html>
<head>
<title>ThaiCreate.Com ASP Cookie Object</title>
</head>
<body>
<%
'*** Cookies None Key ***'
Response.Cookies("SiteName").Expires = Now + 7
Response.Cookies("Creator").Expires = Now + 7
Response.Cookies("SiteName") = "www.ThaiCreate.Com"
Response.Cookies("Creator") = "Mr.Weerachai Nukitram"
'*** Cookies Have Key ***'
Response.Cookies("User")("Username") = "Weerachai"
Response.Cookies("User")("Password") = "MyWin"
Response.Cookies("User")("Level") = "Admin"
Response.Cookies("User")("Status") = "Active"
Response.Cookies("User").Expires = Now + 7
Response.write("Cookie Created<br><br>")
Response.write("<a href=ASPCookieObject2.asp>Check Cookie</a>")
%>
</body>
</html>
ASPCookieObject2.asp (Read Cookies)
<html>
<head>
<title>ThaiCreate.Com ASP Cookies Object</title>
</head>
<body>
<%
'*** Cookies None Key ***'
Response.write "SiteName = "& Request.Cookies("SiteName") & "<br>"
Response.write "Creator = "& Request.Cookies("Creator") & "<br>"
Response.write("<hr>")
'*** Cookies Have Key ***'
Response.Cookies("User").Expires = Now + 7
Response.Cookies("User")("Username") = "Weerachai"
Response.Cookies("User")("Password") = "MyWin"
Response.Cookies("User")("Level") = "Admin"
Response.Cookies("User")("Status") = "Active"
Response.write "Username = "& Request.Cookies("User")("Username") & "<br>"
Response.write "Password = "& Request.Cookies("User")("Password") & "<br>"
Response.write "Level = "& Request.Cookies("User")("Level") & "<br>"
Response.write "Status = "& Request.Cookies("User")("Status") & "<br>"
Response.write("<hr>")
Dim List
IF Request.Cookies("User").HasKeys Then
For Each List In Request.Cookies("User")
Response.write List &" = " & Request.Cookies("User")(List) & "<br>"
Next
End IF
Response.write("<br><br><a href=ASPCookieObject3.asp>Delete Cookies</a>")
%>
</body>
</html>
ASPCookieObject3.asp (Delete Cookies)
<html>
<head>
<title>ThaiCreate.Com ASP Cookies Object</title>
</head>
<body>
<%
'*** Cookies None Key ***'
Response.Cookies("SiteName").Expires = Now
Response.Cookies("Creator").Expires = Now
'*** Cookies Have Key ***'
Response.Cookies("User").Expires = Now
Response.write("Cookie Deleted<br><br>")
Response.write("<a href=ASPCookieObject2.asp>Check Cookie</a><br>")
Response.write("<a href=ASPCookieObject1.asp>Create Cookie</a><br>")
%>
</body>
</html>
คำอธิบาย
ASPCookieObject1.asp // Create Cookies
ASPCookieObject2.asp // Read Cookies
ASPCookieObject3.asp // Delete Cookies Screenshot