?? login.asp
字號(hào):
<!--#include file="conn.asp"-->
<!--#include file="config.asp"-->
<!--#include file="md5.asp"-->
<%
'**************************************************
'----------------后臺(tái)管理系統(tǒng)----------------
'--------------Designed by FlyinG------------
'--------------mail:zc.h@163.net-------------
'----------------QQ:18569237-----------------
'**************************************************
select case request("action")
case "checklogin"
call checklogin
response.End
case "loginout"
call loginout()
response.end
case "savesetup"
call savesetup()
response.End()
case "setup"
call setup()
response.End()
case else
call login()
end select
sub login()
dim num1
dim rndnum
Randomize
Do While Len(rndnum)<4
num1=CStr(Chr((57-48)*rnd+48))
rndnum=rndnum&num1
loop
session("verifycode")=rndnum
response.Write("<title>管理員登陸</title>")
%>
<!--#include file="admin_css.asp"-->
<%
response.Write("<body leftmargin='0' topmargin='0'>")
response.Write("<br><br>")
response.Write("<table width='30%' border='0' align='center' cellpadding='3' cellspacing='1' class='tablecolor'>")
response.Write("<form name='form1' method='post' action='?action=checklogin' onsubmit='return check()'>")
response.Write("<tr><td height='25' colspan='2' align='center' class='banner'>管理員登錄</td></tr>")
response.Write("<tr><td width='50' class='tablebody' >用戶名： </td><td class='tablebody' ><input name='user' type='text' id='user'></td></tr>")
response.Write("<tr><td class='tablebody' > 密碼： </td><td class='tablebody' ><input name='pwd' type='password' id='pwd'></td></tr>")
response.Write("<tr><td class='tablebody' >請(qǐng)輸入您的附加碼：</td><td class='tablebody' ><INPUT name=verifycode type=text size=15> 請(qǐng)?jiān)诟郊哟a框輸入<input name='textfield' type='text' value='"&session("verifycode")&"' size='4' readonly=''><b><span style='background-color: #FFF7CE'></span></b></td></tr>")
response.Write("<tr align='center'><td colspan='2' class='tablebody'><input type='submit' name='Submit' value='提 交'> <input type='reset' name='Submit2' value='重 置'></td></tr></form></table>")
end sub
sub checklogin()
if Instr(request.form("user"),"=")>0 or Instr(request.form("user"),"%")>0 or Instr(request.form("user"),chr(32))>0 or Instr(request.form("user"),"?")>0 or Instr(request.form("user"),"&")>0 or Instr(request.form("user"),";")>0 or Instr(request.form("user"),",")>0 or Instr(request.form("user"),"'")>0 or Instr(request.form("user"),",")>0 or Instr(request.form("user"),chr(34))>0 or Instr(request.form("user"),chr(9))>0 or Instr(request.form("user"),"?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -