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

% >