<%
dim Num
Num=Request.Cookies("Visit_num")
if Num>0 then
Num=Num+1
Response.write "您已是第" & Num & "次訪問本網站了。"
else
Response.write "歡迎您首次訪問本站。"
Num=1
end if
Response.Cookies("Visit_num")=Num
%>
在該例子中，首先讀取Cookies變數Visit_num，看使用者端電腦是否儲存有Cookies變數。如果有該變數，則說明使用者已經訪問過該頁面，同時輸入出訪問次數。如果使用者是首次訪問該頁面，則其電腦內不會有Cookies變數，程式會顯示“歡迎”字樣，然後將Cookies變數Visit_num存到使用者電腦中，以便該使用者下一次訪問該頁面時給出“訪問的次數”資訊。
<%For each cookie in Request.Cookies
if Not cookie.HasKeys then
Response.write cookie & "=" & Request.Cookies(cookie)
Else
for each key in Request.Cookies(cookie)
Response.write cookie&"("&key&")"&"="& Request.Cookies(cookie)(key)
next
end if
next
%>
