?? login.asp
字號:
<!-- #include file="密碼驗證.asp" -->
<%un=request.form("NOIuser")
pa=request.form("NOIpass")
title="請您登陸 --NOIP2006"
%>
<!-- #include file="conn.asp" -->
<%
set rs = server.CreateObject("ADODB.Recordset")
rs.open "SELECT * FROM NOIP選手 WHERE id=0" & Request.Cookies("NOIPid") ,conn ,3,3
if not rs.eof then
NOIPUserName =rs("姓名")
NOIPUserID=rs("id")
NOIPUserTit=rs("頭銜")
NOIPUserMD5=rs("MD5密碼")
if Request.QueryString("menu")="out" then
Response.Clear
response.Cookies("NOIPpass")=""
response.Cookies("NOIPid")=""
response.Cookies("NOIPuser")=""
rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
<SCRIPT language=vbscript>
top.location.reload
</SCRIPT>
sdddddd
<%
Response.End
end if
rs.close
set rs=nothing
end if
if NOIPUserMD5=md5(Request.Cookies("NOIPpass")) then
%>
<!-- #include file="head.asp" -->
<table width="333" border="0" cellspacing="1" cellpadding="2" align="center" class=a2 id="table6">
您已經登陸成功,您的用戶名是:<%=Request.Cookies("NOIPuser") %>如果要退出,請點擊<a href="login.asp?menu=out">這里</a>
</table>
<!-- #include file="foot.asp" -->
<%
Response.End
end if
if un<> "" and pa<>"" then
set rs = server.CreateObject("ADODB.Recordset")
rs.open "SELECT * FROM NOIP選手 WHERE 姓名 = " & """" & un & """",conn ,3,3
if err then Response.end
if rs.eof then Response.Redirect "login.asp?class=" & classnum
if rs("MD5密碼")=md5(pa) then
rs("登陸次數")=rs("登陸次數")+1
Response.Clear
response.Cookies("NOIPpass")=pa
response.Cookies("NOIPuser")=rs("姓名")
response.Cookies("NOIPid")=rs("id")
rs.update
rs.close
Response.Redirect "index.asp?class="& classnum
else
Response.Write "<script language=vbscript> self.alert("&""""&"密碼錯誤"&""""&")</script>"
Response.Write "<script language=vbscript> history.back </script>"
end if
set rs=nothing
else
%>
<!-- #include file="head.asp" -->
<script language=VBScript>
if instr(1 , top.location , "index.asp" )=0 then top.location="index.asp?url=" & replace(self.location ,"&","%26")
</script>
<table width="333" border="0" cellspacing="1" cellpadding="2" align="center" class=a2 id="table6">
<form action="login.asp?class=<%=classnum%>" method="POST" id=form1 name=form1>
<tr>
<td width="328" height="25" align="center" class=a1>
登錄留言板</td></tr><tr>
<td height="19" width="328" valign="top" align="center" class=a3>
用戶名稱: <input type="text" size="20" value name="NOIuser">
<br>
用戶密碼: <input type="password" size="20" value name="NOIpass"> <br>
<input type="submit" value=" 登錄 " name="Submit1"> <input type="reset" value=" 取消 " name="Submit"> </td></tr> <input type="hidden" name="do" value="login"> </form></table>
<%end if%><!-- #include file="foot.asp" -->
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -