<%
'(1)、创建Cookies
'Response.Cookies("变量名称") = 变量值
'(1)、创建Cookies
'Response.Cookies("变量名称") = 变量值
response.Cookies("name")="flash"
'(2)、设置Cookies的生命周期
'Response.Cookies("变量名称").Expires = RelativeDate
'Response.Cookies("变量名称").Expires = RelativeDate
response.cookies("name").expires=date()+1
response.Write("写入成功")
response.Write("写入成功")
(3)读取存储Cookies信息
dim username
username=request.Cookies("name")
response.Write("你写的姓名是："&username)
%>
username=request.Cookies("name")
response.Write("你写的姓名是："&username)
%>
