猫猫喵喵狗狗
< %@ 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
% >
