如何编写ASP对cookie操作?(100分)

  • 主题发起人 主题发起人 liuqin2000
  • 开始时间 开始时间
L

liuqin2000

Unregistered / Unconfirmed
GUEST, unregistred user!
如何写客户端的cookie,希望得到源代码、并且已经过验证。
 
Response.Cookies(cookie)[(key)|.attribute]=value
 
以下为建立一个访问计数器的程序,可以参照:
const
lastip:string='0:0:0:0'; //避免重复计数
var
s:string;
count:integer;
begin
s:=request.cookiefields.values['count'];
if s<>'' then begin
try
count:=strtoint(s);
except
count:=0;
end;
end else count:=0;
if lastip<>request.remoteaddr then inc(count);
lastip:=request.remoteaddr;
response.setcustomheader('set-cookie','count='+inttostr(count)+'; expires=sun, 21 feb 2010 08:08:08 gmt');
response.content:='您是第'+inttostr(count)+'来到本页!';
end;

(以上程序用win95b的个人web服务器+netscape navigator 4.04调试通过)
 
看看DelphiBBS的Source(老的版本好像有对Cookie操作).

Kill Night 写的好像是用Delphi写的ASP COM


 
取得cookies值:
Survey=request.Cookies("MyCook")
写入cookies值
if Survey='' then 'cookies为空
Response.Cookies("MyCook")="|" '此值可以随便写
Response.Cookies("MyCook").Expires=#january 01,2010# '写入cook保留时间
else
Respomse.Cookies("MyCook")=Survey+"abcd"
Response.Cookies("MyCook").Expires=#january 01,2010# '写入cook保留时间

end if


满意吗?
 
多人接受答案了。
 
后退
顶部