?? login.asp
字號:
<!--#include file="Odbc_connection.asp"-->
<!--#include file="top.asp"-->
<!--#include file="Function.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="wangye9pt.css" rel="stylesheet" type="text/css">
</head>
<script language="JavaScript">
function checkdata() {
if (document.frm.username.value=='') {
window.alert ("請輸入登陸ID！")
return false}
if (document.frm.password.value=='') {
window.alert ("請輸入您密碼！")
return false}
if (document.frm.reg.value=='') {
window.alert ("請輸入附加碼！")
return false}
return true
}
</script>
<body>
<table width="768" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td valign="top"><!--#include file="left.asp"--></td>
<td valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr> </tr>
</table>
<img src="images/pingbanner.jpg" width="500" height="120">
<form name="frm" method="post" action="" onSubmit="return checkdata()">
<table width="400" border="0" align="center" cellpadding="0" cellspacing="0" class="w9pt">
<tr>
<td colspan="3"><p> </p>
<p> </p></td>
</tr>
<tr align="center">
<td colspan="3" class="W12pt" style="font-size: 10pt">歡迎登陸哈爾濱學院數學與計算機學院教師評價系統</td>
</tr>
<tr align="center">
<td colspan="3" class="W12pt"> </td>
</tr>
<tr>
<td width="11%" align="right"><img src="images/login.gif" width="16" height="16"></td>
<td width="19%" align="right">請選擇身份：</td>
<td width="70%" height="30"><input name="typed" type="radio" value="3" checked>
學生
<input type="radio" name="typed" value="2">
督導
<input type="radio" name="typed" value="1">
領導</td>
</tr>
<tr>
<td colspan="2" align="right">登陸ID：</td>
<td height="30"><font color="#FFFFFF">
<input name="username"
type="text" class="bginput" id="username2"
style="BORDER-RIGHT: rgb(126,126,126) 1px solid; BORDER-TOP: rgb(126,126,126) 1px solid; BORDER-LEFT: rgb(126,126,126) 1px solid; BORDER-BOTTOM: rgb(126,126,126) 1px solid; BACKGROUND-COLOR: rgb(255,255,255); width: 70px; font-size: 12px; color: #000000" size="10" maxlength="10">
</font></td>
</tr>
<tr>
<td colspan="2" align="right">登陸密碼：</td>
<td height="30"><font color="#FFFFFF">
<input name="password" type="password" class="bginput" id="password2"
style="BORDER-RIGHT: rgb(126,126,126) 1px solid; BORDER-TOP: rgb(126,126,126) 1px solid; BORDER-LEFT: rgb(126,126,126) 1px solid; BORDER-BOTTOM: rgb(126,126,126) 1px solid; BACKGROUND-COLOR: rgb(255,255,255); width: 70px; font-size: 12px; color: #000000"
size=10 maxlength="10">
</font></td>
</tr>
<tr>
<td colspan="2" align="right">附加碼：</td>
<td height="30"><font color="#FFFFFF">
<input name="reg" type="password" class="bginput" id="password"
style="BORDER-RIGHT: rgb(126,126,126) 1px solid; BORDER-TOP: rgb(126,126,126) 1px solid; BORDER-LEFT: rgb(126,126,126) 1px solid; BORDER-BOTTOM: rgb(126,126,126) 1px solid; BACKGROUND-COLOR: rgb(255,255,255); width: 40px; font-size: 12px; color: #000000"
size=4 maxlength="4">
</font>
<%
FOR i=1 to 4
suiji=suijishu()
suiji1=suiji1&suiji
response.Write "<img src='images/suiji/"&cstr(suiji)&".gif'>"
next
%>
<input name="reg1" type="hidden" id="reg1" value=<%=suiji1%>></td>
</tr>
<tr>
<td colspan="2"> </td>
<td height="40"><input type="submit" name="Submit" value="提交">
<input type="reset" name="Submit2" value="重置"></td>
<%
username=trim(request.Form("username"))
password=trim(request.Form("password"))
reg=trim(request.Form("reg"))
reg1=trim(request.Form("reg1"))
typed=trim(request.Form("typed"))
if username<>"" and password<>"" and reg<>"" then
if reg<>reg1 then
ShowMessage("附加碼錯誤！")
else
'''''''*************附加碼錯誤，不能登陸！
if username=admin and password=adminpassword then
session("Admin")="ADMINHRBU"
response.write"<script>alert('登陸成功\n歡迎管理員的到來');location='admin/admin.asp'</script>"
end if
'''''''*************是管理員！登陸轉向管理
strsql="select * From USERInfo Where typedok=1 and username='"&username&"' and password='"&password&"'"&"and typed="&cint(typed)
set rs=db.execute(strsql)
if not rs.eof then
session("UserID")=rs("username")
session("usertype")=rs("typed")
session("Userclass")=rs("class1")
session("Userdepartment")=rs("depart")
session("UserNAME")=rs("REALNAME")
IP=request.ServerVariables("REMOTE_ADDR")
strsql="insert into userlog(realname,submitdate,ip,typed,depart) values('"&rs("realname")&"','"&now()&"','"&IP&"',"&rs("typed")&",'"&rs("depart")&"')"
db.execute(strsql)
response.write"<script>alert('登陸成功\n歡迎"&rs("realname")&"的到來');location='userInfo.asp?UserID="&rs("username")&"'</script>"
else
response.write"<script>alert('對不起，訪客無權訪問，請登錄！\n或你填寫的用戶名，密碼有錯誤！');location='login.asp'</script>"
end if
'''''''*************附加碼錯誤，不能登陸！
end if
end if
%>
</tr>
<tr>
<td colspan="2"> </td>
<td><div align="right"><a href="reg.asp" target="_self"><img src="images/reg.gif" border="0" usemap="#Map2"></a>
<map name="Map2">
<area shape="rect" coords="143,18,210,39" href="reg.asp">
</map>
</div></td>
</tr>
</table>
</form></td>
</tr>
</table>
</body>
</html>
<% databaseclose()%>
<!--#include file="foot.asp"-->?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -