%@ LANGUAGE="VBscript" %  >
%
Chunfeng=Request.Cookies("Chunfeng")

' 初始設置頁面,讀取名字為Chunfeng的Cookie值.
If Chunfeng ="" then

' 判斷是否已經存在Cookie值.
  Response.Cookies("Chunfeng")="x"
  Response.Cookies("Chunfeng").Expires=#January 01, 2010#
  Response.Redirect "Chunfeng.asp"

' 如果不存在,就創建并設置Cookie,并轉到頁面Chunfeng.asp.當下次訪問時,因為存在Cookie值,就不會再轉到Chunfeng.asp 頁面.
Else
'rest of the page

' 如果Cookie已經存在,則訪問者將執行頁面中剩余的代碼.
End if
% >