📄 admin_login.asp
字号:
<html>
<head>
<% help_location = "teacher_login" %>
<!-- Author: Brad Pierce -->
<title>Netest Administrator Login</title>
<link href="admin_basics.css" rel="stylesheet" type="text/css">
</head>
<table border='0'><tr><td><img src="../images/netest.png"></td><td width='5%'></td><td width='100%'><br><h2>Administrator Login</h2></td></tr>
<!-- NAVBAR CANNOT BE USED FROM PRINT FILE BECAUSE THE MENU IS DIFFERENT!!! -->
<!-- #include file="../admin_navbar/navbar_functions.inc" -->
<body onLoad="MM_preloadImages('../admin_navbar/AdminLogin.png','../admin_navbar/AdminHelp.png','../admin_navbar/AdminAboutNeTesT.png','../admin_navbar/AdminNeTesTMain.png')">
<TR><td></td><td colspan='2' width='100%'><hr width='100%' size='2' color='#000000'></td></tr>
<tr><td valign='top'>
<table border="0" cellspacing="0">
<tr><td><a href="../index.asp" target="_top" onClick="MM_nbGroup('down','group1','AdminNeTesTMainPlain','',1)" onMouseOver="MM_nbGroup('over','AdminNeTesTMainPlain','../admin_navbar/AdminNeTesTMain.png','',1)" onMouseOut="MM_nbGroup('out')"><img src="../admin_navbar/AdminNeTesTMainPlain.png" alt="" name="AdminNeTesTMainPlain" border="0" onload=""></a></td></tr>
<tr><td><a href="admin_login.asp" target="_top" onClick="MM_nbGroup('down','group1','AdminLoginPlain','',1)" onMouseOver="MM_nbGroup('over','AdminLoginPlain','../admin_navbar/AdminLogin.png','',1)" onMouseOut="MM_nbGroup('out')"><img src="../admin_navbar/AdminLoginPlain.png" alt="" name="AdminLoginPlain" width="120" height="19" border="0" onload=""></a></td></tr>
<tr><td><a href="javascript:createWindow('../doc/using_netest.asp#login_help','window2','width=600,height=400,status,location,resizable,scrollbars')" target="_top" onClick="MM_nbGroup('down','group1','AdminHelpPlain','',1)" onMouseOver="MM_nbGroup('over','AdminHelpPlain','../admin_navbar/AdminHelp.png','',1)" onMouseOut="MM_nbGroup('out')"><img src="../admin_navbar/AdminHelpPlain.png" alt="" name="AdminHelpPlain" width="120" height="19" border="0" onload=""></a></td></tr>
<tr><td><a href="../doc/about.html" target="_top" onClick="MM_nbGroup('down','group1','AdminAboutNeTesTPlain','',1)" onMouseOver="MM_nbGroup('over','AdminAboutNeTesTPlain','../admin_navbar/AdminAboutNeTesT.png','',1)" onMouseOut="MM_nbGroup('out')"><img src="../admin_navbar/AdminAboutNeTesTPlain.png" alt="" name="AdminAboutNeTesTPlain" width="120" height="19" border="0" onload=""></a></td></tr>
</table></td>
<td></td><td><br>
<h3><font color='#000040'>Enter Administrator Username and Password</font></H3>
<form method="post">
<table>
<tr><td>Username:</td><td><input type="text" name="username"></td></tr>
<tr><td>Password:</td><td><input type="password" name="password"></td><td><input type="submit" value="Login"></td></tr>
</table>
</form>
<%
dim oConn ' Connection Object
dim oRS ' Record Set Object
Set oConn=Server.CreateObject("ADODB.connection")
set oRS=Server.CreateObject("ADODB.recordset")
username = Replace(Request("username"), "'", "''")
password = Replace(Request("password"), "'", "''")
oConn.Open "DSN=sd2db; UserID=Admin; pwd=netest"
sqltext = "SELECT * FROM Administrator WHERE Admin_Code='" & username & "'" & " AND Admin_Password='" & password & "'"
oRS.Open sqltext, oConn
IF oRS.EOF THEN
IF username <> "" OR password <> "" THEN
Response.Write "<table><tr><td><img src='../images/warning.gif'></td><td><div id=warning>Invalid Login. Please try again.</div></td></tr></table>"
ELSE
response.write "<table border='0' height='25'><tr><td></td></tr></table>"
END IF
ELSE
Session("username") = username
Session("admin_authenticated") = TRUE
Response.Redirect("admin_home.asp")
END IF
oRS.Close
Set oRS = nothing
oConn.Close
Set oConn = nothing
%>
</body>
</td></tr>
<tr><td></td><td colspan='2'><br><br><hr size='2' color='#000000'>
<font size='1'>Powered by Netest</font>
</td></tr></table>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -