当前页面位置: » 丰搜网 » 文档中心 » 详细内容
asp中cookie使用指南
我自己曾想写一篇关于cookie的文章，特别是client端script同server端asp通过cookie交互的问题可能会困扰大家。其实是如果你对cookie有深入的理解，特别是对域和路径的概念比较清晰的话，就不会有问题了。
另外想提示的一点是request.servervariables("http_cookie")得到cookie和request.cookies得到的结果可能会有所不同。大家思考一下为什么，会对asp的学习提高有所帮助的。 request.cookies，例子：
<table border="2">
<thead>
<th>cookie name</th>
<th>cookie value</th>
<th>cookie haskeys</th>
</thead>
<%
dim item
for each item in request.cookies
%>
<tr>
<td><% = item %></td>
<td><% = request.cookies(item) %></td>
<td><% = request.cookies(item).haskeys %></td>
</tr>
<tr>
<%
if request.cookies(item).haskeys then
for each strsubkey in request.cookies(item)
%>
<td>&bnsp;</td>
<td>&bnsp;</td>
<td><% = request.cookies(strkey)(strsubkey) %></td>
<%
next
end if
next
%>
</table>
request.servervariables("http_cookie")，粒子：
<table border="2">
<thead>
<th>cookie name</th>
<th>cookie value</th>
</thead>
<%
dim item,sp,i,d
sp = split(request.servervariables("http_cookie"),"; ",-1,1)
' loop through the cookie collection displaying each cookie we find
for i=0 to ubound(sp)
d = split(cstr(sp(i)),"=",-1,1)
%>
<tr>
<td><% = d(0) %></td>
<td><% if ubound(d)=1 then response.write(d(1)) else response.write " " %></td>
</tr>
<%
next
%>
</table>
重粒子@y2k0814
--------------------------------------------------------
下面是甘冀平翻译的<asp中cookie使用指南>
实际上，在web开发中，cookie仅仅是一个文本文件，当用户访问站点时，它就被存储在用户使用的计算机上，其中，保存了一些信息，当用户日后再次访问这个站点时，web可以将这些信息提取出来。
尽管现在听起来cookie没有什么激动人心的，但实际上利用它，你能实现许多有意义的功能！比如说：你可以在站点上放置一个调查问答表，询问访问者最喜欢的颜色和字体，然后根据这些定制用户的web界面。并且，你还可以保存访问者的登录密码，这样，当访问者再次访问这个站点时，不用再输入密码进行登录。
当然，cookie也有一些不足。首先，由于利用cookie的功能可以编程实现一些不良企图，所以大多数的浏览器中都有安全设定，其中可以设置是否允许或者接受cookie，因此这就不能保证随时能使用cookie。再者，访问者可能有意或者无意地删除cookie。当访问者的机器遇到“蓝屏”死机时，或者重新格式化硬盘、安装系统后，原来保存的cookie将全部丢失。最后一点，有一些最初始的浏览器并不能支持cookie。
利用cooklie能做什么？
有2种使用cookie的基本方式：
1、将cookie写入访问者的计算机（使用 response 命令）
2、从访问者的计算机中取回cookie（使用 request 命令）
创建cookie的基本语法
response.cookies("cookiename")=value
执行下面的代码将会在访问者的计算机中创建一个cookie，名字＝visitorname，值＝ken
response.cookies("visitorname")="ken"
执行下面的代码将会在访问者的计算机中创建一个cookie，名字＝visitorname，值＝表单中username的值
response.cookies("visitorname")=request.form("username")
读取cookie的基本语法
request.cookies("cookiename")
可以将request值当作一个变量看待，执行下面的代码，将取回名字为kenscookie的cookie值，并存入变量myvar：
myvar=request.cookies("kenscookie")
执行下面的代码，将判断名字为kenscookie的cookie值是否为“yes”：
if request.cookies("kenscookie")="yes" then
功能丰富的cookie
你可以扩展上面的代码成为cookie子关键值（cookiesubname），代码如下：
response.cookies("visitorname")("firstname")="ken"
response.cookies("visitorname")("lastname")="baumbach"
讲解例子前，最后讨论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
这里有另外一个简单的例子：当访问者第１次浏览某个站点时，向他们显示欢迎信息。代码如下：
< %@ language="vbscript" % >
< %
requestname = request.form("name")
requestleavemealone = request.form("leavemealone")
if requestname < >"" or requestleavemealone < >"" then
response.cookies("mysitevisitorname") = requestname
response.cookies("mysitevisitorname").expires = #january 01, 2010#
response.cookies("mysiteleavemealone") = requestleavemealone
response.cookies("mysiteleavemealone").expires = #january 01, 2010#
end if
visitorname = request.cookies("mysitevisitorname")
leavemealone = request.cookies("mysiteleavemealone")
if visitorname ="" and leavemealone ="" then
% >
< html > < head > < /head >
< body bgcolor="#ccffff" text="black" link="navy" vlink="purple" >
< div align="center" >
< form action="index.asp" method="post" >
< h2 >let's be friends< /h2 >
what's your name (leave blank and hit the submit button if you don't want us to know)?
< input type="text" name="name" >< br >< br >
< input type="hidden" name="leavemealone" value="x" >
< input type="submit" value="submit" >
< /form >
< /div >
< /body >
< %
end if
if visitorname < > "" then
response.write "hi, " & visitorname & "! i hope you are having a great day!"
end if
'rest of the page
% >
好，现在来看看上面的代码实现执行了什么。首先，设置页面。然后，检查表单变量（在同一个页面中）。如果表单变量存在，就创建cookie，并设置到期时间。
< %@ language="vbscript" % >
< %
requestname = request.form("name")
requestleavemealone = request.form("leavemealone")
if requestname < >"" or requestleavemealone < >"" then
response.cookies("mysitevisitorname") = requestname
response.cookies("mysitevisitorname").expires = #january 01, 2010#
response.cookies("mysiteleavemealone") = requestleavemealone
response.cookies("mysiteleavemealone").expires = #january 01, 2010#
end if
接着，读取cookie：
visitorname = request.cookies("mysitevisitorname")
leavemealone = request.cookies("mysiteleavemealone")
如果cookie在访问者的计算机上不存在，就创建一个表单，询问相关信息：
if visitorname ="" and leavemealone ="" then
% >
< html >
< head >
< /head >
< body bgcolor="#ccffff" text="black" link="navy" vlink="purple" >
< div align="center" >
< form action="index.asp" method="post" >
< h2 >let's be friends< /h2 >
what's your name (leave blank and hit the submit button if you don't want us to know)?
< input type="text" name="name" >< br >< br >
< input type="hidden" name="leavemealone" value="x" >
< input type="submit" value="submit" >
< /form >
< /div >
< /body >
< %
end if
如果cookie已经存在，并且用户名字存在，就显示给访问者一个欢迎界面，然后执行其余的代码。
if visitorname < > "" then
response.write "hi, " & visitorname & "! i hope you are having a great day!"
end if
'rest of the page
% >
