📄 adlogin.asp
字号:
<!-- #Include File=Conn.asp -->
<%
Response.Expires=0
if request("adminname") <> "" then
username=trim(replace(request("adminname"),"'",""))
password=trim(replace(request("password"),"'",""))
for i=1 to len(username)
user=mid(username,i,1)
if user="'" or user="%" or user="<" or user=">" or user="&" or user="|" then
response.write "<script language=JavaScript>" & "alert('您的用户名含有非法字符,请重新输入！');" & "history.back()" & "</script>"
response.end
end if
next
for i=1 to len(password)
pass=mid(password,i,1)
if pass="'" or pass="%" or pass="<" or pass=">" or upass="&" or pass="|" then
response.write "<script language=JavaScript>" & "alert('您的密码含有非法字符,请重新输入！');" & "history.back()" & "</script>"
response.end
end if
next
sql="select * from admin where username='"&username&"' and password='"&password&"'"
set rs=conn.execute(sql)
if not rs.EOF then
session("adpass")="passed"
response.redirect "adlist.asp"
else response.write "<script language=JavaScript>" & chr(13) & "alert('密码不正确,请重新输入！');" & "history.back()" & "</script>"
end if
else
%>
<html>
<head>
<link rel="stylesheet" type="text/css" href="style.css">
</head>
<form method="post" action="adlogin.asp" name="adlogin">
<p align="center"> </p>
<table border=1 cellpadding=5 cellspacing=0
width="501" align="center" bordercolor="#999999" bgcolor="#FFCC99" bordercolorlight="#000000" bordercolordark="#FFFFFF">
<tr>
<td align=middle
width=483 height="25">
<p align="center"><font color="#FF3333"><font color="#FF0000">管理登陆</font></font>
</p>
</td>
</tr>
<tr>
<td align=middle
width=483> <br>
<table width=100% border=0 cellspacing=0 cellpadding=6 bgcolor="#bbbbbb">
<tr>
<td width=30% class=link align="right">管理员名称：</td>
<td width=70%>
<input type=text name=adminname size=20 maxlength=20 class=link>
<font color="#FF3333">*</font> 字母或数字</td>
</tr>
<tr>
<td width=30% class=link align="right">管理员密码：</td>
<td width=70%>
<input type=password name=password size=20 maxlength=20 class=link>
<font color="#FF3333">*</font> 字母或数字</td>
</tr>
</table>
<br>
</td>
</tr>
<tr>
<td align=middle
width=483>
<div align="center">
<input type="submit" value="进入!" name="submit">
</div>
</td>
</tr>
<tr>
<td align=middle
width=483>
<div align="left">注意事项：<br>
<br>
1、不得使用本系统发表任何包含色情、非法、以及危害国家安全的内容的信息. <br>
<br>
2、以上规则违者责任自负，本站有权删除该类用户或者内容，并追究其法律责任。</div>
</td>
</tr>
<tr>
<td align=middle
width=483>
<div align="center">程序制作：<a href="http://www.soonhost.com" target="_blank"><b>迅捷主机网</b></a></div>
</td>
</tr>
<tbody> </tbody>
</table>
</form>
</html>
<%
end if
Conn.Close
Set Conn=Nothing
'====================================================
'迅捷会员注册管理系统 v2.0
'程序制做:迅捷主机网.http://www.soonhost.com
'迅捷主机网 ------ 首选域名、虚拟主机、企业邮局提供商
'网址：http://www.soonhost.com
'EMAIL：sell@china.com
'msn:soonhost@hotmail.com
'oicq: 123150745
'本站还提供大量脚本下载,负责安装;脚本定制价格低廉.
'程序为免费程序，您可以使用本程序，但必须
'保留迅捷主机网(http://www.soonhost.com)的链接！
'================================================
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -