Login 小樱之町 歌词库 管理员登陆

Username:
用户名：
Password:
密码：
  • Explain: The new manage system has benn used, and is making test. You can managing as the past.
  • If you hava any idea or advice, please send me an Email.
  • 说明：新的管理系统已启用，正在进行测试，您现在可以和以前一样进行管理。
  • 如果你在使用中遇到问题或有意见/建议，请发送邮件告诉我。
<% Const LeastLoginTime=3 Sname=Request.Form("name") Spass=Request.Form("password") If Request.QueryString("action")="login" then rs.open "select * from admin where name='"&replace(Sname," ","")&"'",conn,3,3 If not (rs.bof or rs.eof) then Dname=rs("name") Dpass=rs("password") End If rs.close() '验证登陆 If Dname=Sname and Dpass=Spass and Now()-application("Lyric_LastLoginTime")>LeastLoginTime/24/60/60 and Sname<>"" then session("lyric_admin")=true response.redirect("admin.asp") Else application("Lyric_LastLoginTime")=Now() response.write "Invalid username and password. Or you try to login in such a short time. Please wait " & LeastLoginTime & " second(s). " End If End If If Request.QueryString("action")="logout" then session("lyric_admin")=empty response.redirect("index.asp") End If set rs=nothing set conn=nothing %>