<!--------index.asp---------->
<style>
body,form,table{ font-size:12px;font-family:Verdana}
.inp{ border-left:white;border-top:white;border-right:white;border-bottom:1px solid gray; width:80px}
</style>
<%
if request.Cookies("User")("Name")="" then
%>
<form method=post name=login action=login.asp>
<div align=center>
<table cellspacing=5 cellpadding=5>
<tr>
<td colspan=2>您还没有登录!</td>
</tr>
<tr>
<td width=60 align=right>用户名: </td><td align=left><input name=Name class=inp></td>
</tr>
<tr>
<td width=60 align=right>密 码: </td><td align=left><input name=Pwd class=inp type=password></td>
</tr>
<tr>
<td width=60 align=right>保存期限: </td><td align=left><select name=Cookies_Time>
<option value=1>1
<option value=7>1周
</select></td>
</tr>
<tr>
<td colspan=2><input type=submit value=提交></td>
</tr>
</form>
<%
else
%>
<span style="font-size:12px;font-family:Verdana">欢迎您,</span><%=request.cookies("User")("Name")%>。
<%
end if
%>
<!-------------login.asp----------->
<%
Response.Cookies("User")("Name")= request("Name")
Response.Cookies("User")("Pwd")= request("Pwd")
Cookies_Time=request.form("Cookies_Time")
if Cookies_Time="" then Cookies_Time=1
if Cookies_Time<>"0" then
Cookies_Time=dateadd("d",Cookies_Time,date())
Response.Cookies("User").expires=Cookies_Time
response.redirect "index.asp"
end if
%>
由于是第一次登录,所以没有cookie保存在Temporary Internet Files文件夹,在填写用户名和密码以及保存cookies的时间期限后,点击"提交"按钮,在Temporary Internet Files(点击IE的"工具" ->" Internet 选项"的"Internet 临时文件"这一栏目的"设置" -> "查看"按钮即可打开该文件夹。)文件夹里即可产生一个cookie文件,如果按"详细资料"查看的话,很清楚的可以看到在"截止期"的时间就是cookie过期时间。也可以保存cookie过期时间为几小时,将上面代码中的dateadd("d",Cookies_Time,date())改成dateadd("h",Cookies_Time,now())即可。(这些都是织梦里一些帖中可以翻得到的)
写cookie: response.cookies("xx")=值
读cookie: request.cookies("xx")
也可以像上面中的代码一样创建cookie字典。
这个例子并没有整合数据库,目的只是为了让那些看见cookie就打退堂鼓的朋友理解它的运作，原来是那么简单。
个人觉得教程中尽量把代码不必要的部分省去，太多杂的代码会影响效果，我上面也有很多杂的代码，但是应该不会有太大影响。
