学习ASP技术:Cookie使用指南(2)

    命名约定
  
  　　 同其他变量的命名一样，合适地、独特地命名cookie，有利于在程序中前后连贯地使用它。你可以使用下面的1个或者2个
  cookie属性进行cookie变量的命名：
  
  　　 域属性（Domain）：域属性表明cookie由哪个网站产生或者读取，默认情况下，cookie的域属性设置为产生它的网站，但你
  也可以根据需要改变它。相关代码如下：Response.Cookies("CookieName").Domain = "www.mydomain.com"
  
  　　 路径属性（Path）：路径属性可以实现更多的安全要求，通过设置网站上精确的路径，就能限制cookie的使用范围。例如：
  Response.Cookies("CookieName").Path = "/maindir/subdir/path"
  
  　　 使用到期时间
  
  　　通常情况下，当浏览器关闭时，一个cookie就不存在了。但是在许多时候，比如下面将要讨论的Web站点例子，同学们希望能更长时间地在访问者的计算机上保存cookie。很幸运，有这样的实现方法。下面的代码，就可以设置cookie的使用到期时间为2010年1月1日：
  
  Response.Cookies("CookieName").Expires=#January 01, 2010#
  
  
  　　 执行下面的代码，将设定cookie的过期时间为“cookie的创建时间＋365日”：
  
  Response.Cookies("CookieName")=Date+365
  
  
  
  　　 使用cookie的实际例子
  
  　　 现在开始讨论实际的例子。假设：你想做一个调查，每个人初次访问时需要填写好信息，但是当日后再访问时，就不需要再那么做。利用cookie，就可以非常圆满地解决这个问题，而大可不必用到数据库。
  
  < %@ LANGUAGE="VBSCRIPT" % >
  
  < %
  
  Survey=Request.Cookies("KensSurvey")
  
  If Survey ="" then
  
  Response.Cookies("KensSurvey")="x"
  
  Response.Cookies("KensSurvey").Expires=#January 01, 2010#
  
  Response.Redirect "survey.学习ASP技术"
  
  Else
  
  'rest of the page
  
  End if
  
  % >
  
  
  　　 好，下面开始从头讨论上面的代码。
  
  　　 首先，初始设置页面，并读取名字为KensSurvey的cookie值：
  
  < %@ LANGUAGE="VBScript" % >
  
  < %
  
  Survey=Request.Cookies("KensSurvey")
  
  
  　　 然后，判断是否已经存在cookie值：
  
  If Survey ="" then
  
  
  　　 如果不存在， 就创建并设置cookie，并转到页面survey.asp。 当下一次访问时，因为存在cookie值，就不会再转到survey.asp 页面。
  
  Response.Cookies("KensSurvey")="x"
  Response.Cookies("KensSurvey").Expires=#January 01, 2010#
  Response.Redirect "survey.asp"
  
  
  　　 如果cookie已经存在，那么访问者将执行页面中剩余的代码：
  
  'rest of the page
  
  End if
  %>
  
  
  
  　　 例子2