adminlogon.asp
来自「程序名称：酷虎网校友录 V1.0 （商业版）*(修改版） * 本软体为商业软件」· ASP 代码 · 共 100 行
ASP
100 行
<!--#include file="conn.asp"-->
<!--#include file="inc/md5.asp"-->
<%
IF Request.Form.Count<>0 Then
Name=Trim(Request.Form("Name"))
Password=Trim(Request.Form("Password"))
IF Name<>"" And Password<>"" Then
SQL="Select * From 超级管理员 Where 帐号='"& Name &"'"
Set RS=Server.CreateObject("ADODB.REcordset")
RS.Open SQL,Connstr,1,1
IF Not RS.Eof Then
IF md5(Password)=RS("密码") Then
Session("Administrator")=Name
Response.Redirect "adminindex.asp"
End IF
End IF
End IF
End IF
%>
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<!--#include file="inc/css.asp"-->
<title><%=WebSiteName%></title>
</head>
<body topmargin="0" background="images/bg.gif">
<!--#include file="top.asp"-->
<div align="center">
<center>
<table border="0" width="755" cellspacing="0" cellpadding="0">
<tr>
<td width="189" style="background-color: #FFFFFF; border-left: 1 solid #000000; border-top: 1 solid #000000; border-bottom: 1 solid #000000" valign="top">
<!--#include file="left.asp"-->
</td>
<td width="562" style="background-color: #FFFFFF; border: 1 solid #000000" valign="top">
<table border="0" width="100%" cellspacing="0" cellpadding="0">
<!--#include file="navigation.asp"-->
<tr>
<td width="100%" valign="top" height="70">
</td>
</tr>
<tr>
<td width="100%" valign="top">
<div align="center">
<center>
<table border="0" width="504" cellspacing="0" cellpadding="0" style="border: 1 solid #000000">
<tr>
<td height="22" background="images/bg2.gif" width="500" colspan="2">
<p align="center"><b><font color="#FF0000">管理员登录</font></b></p>
</td>
</tr>
<form action="" method="post">
<tr>
<td width="500" colspan="2" height="10">
<p></td>
</tr>
<tr>
<td width="237" align="right" valign="bottom">您 的 姓
名：</td>
<td width="261"><input type=text name="Name" size=12 maxlength=20 style="background-attachment: scroll; background-repeat: repeat; font-size: 9pt; height: 18; width: 102; background-color: #FFFFFF; border: 1 solid #000000; background-position: none 0%">
</td>
</tr>
<tr>
<td width="237" align="right" valign="bottom">您 的 密
码：</td>
<td width="261"><input type=password name="Password" size=12 maxlength=16 style="background-attachment: scroll; background-repeat: repeat; font-size: 9pt; height: 18; width: 102; background-color: #FFFFFF; border: 1 solid #000000; background-position: none 0%">
</td>
</tr>
<tr>
<td width="500" colspan="2" height="10"></td>
</tr>
<tr>
<td width="502" height="22" bgcolor="#EDEDED" style="border-top: 1 solid #000000" colspan="2">
<p align="center" style="margin-top: 5; margin-bottom: 5"><INPUT type=submit value=' 提 交 ' name=Submit style="background-color: #DDDDDD; background-repeat: repeat; background-attachment: scroll; font-size: 9pt; height: 20; width: 85; border: 1px groove #000000; background-position: 0% 50%">
<INPUT type=reset value=' 取 消 ' name=Submit style="background-color: #DDDDDD; background-repeat: repeat; background-attachment: scroll; font-size: 9pt; height: 20; width: 85; border: 1px groove #000000; background-position: 0% 50%"></td>
</tr>
</form>
</table>
</center>
</div>
</td>
</tr>
<tr>
<td width="100%" valign="top">
</td>
</tr>
</table>
</td>
</tr>
</table>
</div>
<!--#include file="bottom.asp"-->
</body>
</html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?