无为清净楼资源网 Design By www.qnjia.com

login.htm

<% @ Language="SavedLogin").HasKeys) {
    Response.Redirect("checklogin.asp?Cookie=1")
}
%>

<html>
<head>

<title>精彩春风之登录页面</title>

</head>
<body>
我要登录随风起舞
<FORM ACTION="CheckLogin.asp" METHOD="POST">
    电子邮件: <INPUT TYPE="Text" NAME="email" SIZE="40"><BR>
    口令: <INPUT TYPE="Password" NAME="Password" SIZE="40"><P>
    <INPUT TYPE="Checkbox" NAME="SaveLogin"> 要把登录内容存为Cookie吗?<P>
    <INPUT TYPE="Submit" VALUE="登录"><INPUT TYPE="RESET">
</FORM>

 

checklogin.asp
<%
dim strEmail
if Request.QueryString("Cookie") = 1 then
    strEMail = Request.Cookies("SavedLogin")("Email")
else
    strEMail = Request.Form("email")
end if

dim bLoginSaved

if Request.Form("SaveLogin") = "on" then
    Response.Cookies("SavedLogin")("EMail") = Request("email")
    Response.Cookies("SavedLogin")("pw") = Request("password")
    Response.Cookies("SavedLogin").Expires = Date + 30
    bLoginSaved = True
else
    bLoginSaved = False
end if
%>

<html>
<head>

<title>精彩春风之登录验证</title>

</head>
<body>

<% if bLoginSaved then %>
    将登录信息保存到Cookie里去<HR>
<% end if %>
欢迎光临随风起舞!<P>

<% if Request.QueryString("Cookie") = 1 then %>
    保存成功!<P>
<% end if %>
请确认您的电子邮件: <% = strEMail %>
</body></html>

标签:
|如何|何决|决定|定是|是否|否将|将登|登录|录内|内容|容保|保存|存到|到C|Co|oo|ok|ki|ie|e里|里?|?|

无为清净楼资源网 Design By www.qnjia.com
广告合作:本站广告合作请联系QQ:858582 申请时备注:广告合作(否则不回)
免责声明:本站文章均来自网站采集或用户投稿,网站不提供任何软件下载或自行开发的软件! 如有用户或公司发现本站内容信息存在侵权行为,请邮件告知! 858582#qq.com
无为清净楼资源网 Design By www.qnjia.com