?? chklogin.asp
字號:
<!--#include file="conn.asp"-->
<!--#include file=md5.asp -->
<%
dim rs,sql,uid,pwd,expTime
uid=trim(request.form("username"))
pwd=trim(request.form("password"))
pwd=MD5(pwd)
expTime=trim(request.form("expTime"))
set rs=server.createobject("adodb.recordset")
sql="select * from admin where username='"&uid&"'"
rs.open sql,conn,1,1
if not rs.eof then
if rs("password")=pwd then
rs.close
set rs=nothing
Response.Cookies("lunjilyb")("username")=uid
Response.Cookies("lunjilyb")("password")=pwd
if expTime<>"" then
response.cookies("lunjilyb").expires=expTime
end if
response.redirect "admin-index.asp"
else
rs.close
set rs=nothing
end if
else
rs.close
set rs=nothing
end if
%>
<script language="javascript">
alert("非法登陸!")
location.href="login.asp"
</script>
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -