login.asp
来自「国内第一数字点卡销售程序。功能强大。 完整无错！数据文件经MD5加密！经严格测」· ASP 代码 · 共 125 行
ASP
125 行
<!--#include file="connstr.asp"-->
<!--#include file="system.asp"-->
<%
if request("action")="login" then
strTemp=request("name")
admin_name=srequest(strTemp,0)
admin_pass=trim(request("pass"))
admin_rank=int(trim(request("rank")))/121
if trim(request("name"))="" then
response.write("<script>alert('请输入用户名!');history.go(-1)</script>")
response.end
end if
if trim(request("pass"))="" then
response.write("<script>alert('请输入密码!');history.go(-1)</script>")
response.end
end if
verifycode=trim(Request("verifycode"))
verifycode2=trim(Request("verifycode2"))
if verifycode<>verifycode2 then
response.write"<SCRIPT language=JavaScript>alert('您输入的验证码不正确。');"
response.write"location.href='login.asp'</SCRIPT>"
else
session("verifycode")=""
set rs=server.createobject("adodb.recordset")
sql="select * from adminlitdata where admin_name='"&admin_name&"'and admin_rank="&admin_rank
rs.open sql,conn,3,3
if rs.eof then
response.write "<br><center><font color=red>用户名不匹配</font>"
elseif md5(admin_pass)=rs("admin_pass") then
if rs("admin_ip")&"1"<>"1" then
response.write("<script>alert('网卡绑定不对！');window.location=('login.asp')</script>")
response.end
end if
session("user_admin")=rs("admin_name")
session("admin_rank")=admin_rank
response.redirect "manage.asp"
else
response.write "<br><center><font color=red>您的密码错误</font>"
end if
rs.close
end if
end if
%>
<% dim rndnum,verifycode
Randomize
Do While Len(rndnum)<4
num1=CStr(Chr((57-48)*rnd+48))
rndnum=rndnum&num1
loop
session("verifycode")=rndnum
%>
<head>
<title>服务管理</title>
<link href=css.css rel=STYLESHEET type=text/css>
</head>
<SCRIPT>
//定义当前需用软键盘的表单和控件的名称
var curEditName
curEditName="form1.pass"
</SCRIPT>
<script language="JavaScript" src="../softkeyboard.js"></script>
<body style="background-color: #F0FBF1">
<center>
<br><br><br><Br><BR><BR><BR><BR><BR>
<TABLE WIDTH=445 BORDER=0 CELLPADDING=0 CELLSPACING=0 align="center">
<TR>
<TD ROWSPAN=3><IMG SRC="../img/user_1.gif" WIDTH=6 HEIGHT=280></TD>
<TD><IMG SRC="../img/user_7.gif" WIDTH=433 HEIGHT=61></TD>
<TD ROWSPAN=3><IMG SRC="../img/user_3.gif" WIDTH=6 HEIGHT=280></TD>
</TR>
<TR>
<TD height="194" background="../img/user_4.gif">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="97%" height="89" valign="top">
<form method="POST" action="login.asp?action=login" name="form1" >
<table border="0" width="100%" cellspacing="1" height="102" bordercolorlight="#C0C0C0" bordercolordark="#FFFFFF">
<tr>
<td width="100" align="center">管理名称：</td>
<td width="293"><input type="text" name="name" size="19" style="width:200;background:A2C5E5" ></td>
</tr>
<tr>
<td width="100" align="center">登陆密码：</td>
<td width="293"><input type="password" name="pass" size="20" style="width:200;background:A2C5E5" > <FONT color=#ffffff><A onclick=showkeyboard(curEditName) style="CURSOR: hand"
title=用软键盘输入密码，防止黑客软件记录键盘的录入信息>密码防盗键盘</A></FONT> </td>
</tr>
<tr>
<td width="100" align="center">验证号码：</td>
<td width="293"><font color="#FFFFFF">
<input type="password" name="verifycode" style="width:200;background:A2C5E5" size="11" class="input"> </font>
<font color="#ffffff">验证号码：<%=session("verifycode")%></font> <input type="hidden" name="verifycode2" value="<%=session("verifycode")%>"></td>
</tr>
<tr>
<td width="100" align="center">管理级别：</td>
<td width="293"> <select size="" name="rank" style="width:200;background:A2C5E5" >
<option value=121>系统管理员</option>
<option value=242>会员管理员</option>
<option value=363>订单管理员</option>
<option value=484>商品管理员</option>
<option value=605>新闻管理员</option>
</select></td>
</tr>
</table>
<p align="center"><input type="image" border="0" name="B1" src="../img/login.gif" width="60" height="20"><br>
</p><p align=right>程序设计：铅笔小新 QQ：381238821 </td>
</form>
</td>
</tr>
</table>
</TD>
</TR>
<TR>
<TD height="25" background="../img/user_6.gif" align=center></TD>
</TR>
</form>
</TABLE>
<p align="center"><br>
</p>
</center>
</body><body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" link="#000000" vlink="#000000" background="di.gif">
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?