%@ 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
% >