submitconsolve.asp

来自「实例丰富经典」· ASP 代码 · 共 29 行

<! DOCTYPE HTML PUBLIC　"-//W3C//DTD HTML 4.0//EN"
"http://www.w3.org/TR/REC-html140/strict.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>Server Page!</title>
<%
if Request("rememberMe")<>""then
   dim strname
   strname=Request("personName")
   Response.Cookies("name")=strname　　　                    //设置客户端Cookie
   Response.Cookies("name").expires="1/1/2008"                 //有效期至2008-1-1
   dim stremail
   stremail=Request("personEmail")
   Response.Cookies("email")=stremail                          //设置客户端Cookie
   Response.Cookies("email").expires="1/1/2008"                 //有效期至2008-1-1
   Response.write("服务器成功为客户端设置Cookies。")
else
   Response.write Request.Cookies("name")&",欢迎光临本站！"    //读取客户端Cookie
end if
%> 
</head>
<body>
<br>
   <center>
   </center>
</body>
</html>