<%
dim num
num=request.cookies("visitnum")
if num > "0" then
num=num+1
response.write "您已是第"&num&"次訪問本站點了。"
else
response.write "歡迎您首次訪問本站。"
num=1
end if
response.cookies("visitnum")=num
response.cookies("visitnum").expires=date+365
%>
◆ showcookie.asp（從cookies資料夾中遍歷出瀏覽器所有的cookie name，以及相關的字典cookie的顯示（藍字顯示））
<%
for each cookie in request.cookies
if request.cookies(cookie).haskeys =false then
response.write cookie & "=" & request.cookies(cookie)
response.write ("
") else
for each key in request.cookies(cookie)
response.write ("")
response.write cookie & ".("&key&")" & "=" & request.cookies(cookie)(key)
response.write ("
")next
end if
next
%>
◆ check.asp
'首先，設定頁面。然後，檢查表單變數（在同乙個頁面中）。如果表單變數存在，就建立cookie，並設定到期時間。
<%@ language="vbscript" %>
<%
bgcolor = request.form("bgcolor")
fgcolor = request.form("fgcolor")
pwd = request.form("pwd")
if bgcolor <>"" or fgcolor <>"" then
response.cookies("check")("bgcolor") = bgcolor
response.cookies("check")("fgcolor") = fgcolor
response.cookies("check")("pwd") = pwd
response.cookies("check").expires=#may 01, 2004#
end if
'接著，讀取cookie
bgcolor = request.cookies("check")("bgcolor")
fgcolor = request.cookies("check")("fgcolor")
pwd = request.cookies("check")("pwd")
'如果cookie在訪問者的計算機上不存在，就建立乙個表單，詢問相關資訊
if bgcolor ="" and fgcolor ="" and pwd="" then
%>
<%
end if
'如果cookie已經存在，並且bgcolor存在，就跳轉到color.asp。
if bgcolor <> "" then
response.redirect "color.asp"
end if
%>
◆ color.asp（顯示使用者愛好顏色的頁面特性）
<%
bgcolor=request.cookies("check")("bgcolor")
fgcolor=request.cookies("check")("fgcolor")
pwd=request.cookies("check")("pwd")
%>
<%response.write("")%>
你的密碼是：
<%response.write(" "&pwd&" ")%>
作者blog：
ASP程式設計入門高階（六） Cookies講座
乙個 cookie 就是乙個唯一標識客戶的標記，cookie 可以包含在乙個對話期或幾個對話期之間某個 web 站點的所有頁面共享的資訊，使用 cookie 還可以在頁面之間交換資訊。這項功能經常被使用在要求認證客戶密碼以及電子公告板 web 聊天室等 asp 程式中。當然，cookie也有一些不足...
ASP程式設計入門高階 Application
1，num.asp 上面的程式，你會發現每重新整理一次，都會記數累加，如按ip值訪問來記數的話，則建立乙個session。2，vnum.asp if session visitnum then session visitnum visited end if 當然需要注意的是 記數要確保伺服器不被重啟...
ASP程式設計入門高階（七） 內建物件Server
server 物件提供對伺服器上的方法和屬性的訪問 其中大多數方法和屬性是作為實用程式的功能服務。iis help翻譯 有了 server 物件，你就可以在伺服器上啟動 activex 物件例程，並使用 active server 服務提供象 html 和 url 編碼這樣的函式。一 script....