05_02.asp

来自「ASPTest 网络基础网页设计」· ASP 代码 · 共 24 行

ASP
24
字号
<html>
<head>
<title>cookie应用实例</title>
</head>
<body>
<% 
Dim strID
Dim strPWD
strID = Request.Form("txtID")
strPWD = Request.Form("txtPWD")
If Len(strID) > 0 and Len(strPWD) > 0 Then
  Response.Cookies("userID") = strID
  Response.Cookies("userPWD") = strPWD
  Response.Cookies("userID").Expires = Date + 30
  Response.Cookies("userPWD").Expires = Date + 30
  Response.Write "你输入的用户ID是:" & strID
  Response.Write "<br>你输入的用户密码是:" & strPWD
  Response.Write "<br>系统已保存你的本次登录信息"
Else
  Response.Write "请输入完整的用户名和密码"
End If
%>   
</body>
</html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?