📄 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="786" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td width="188" rowspan="2" valign="top" background="images/lefttiao.jpg"><!--#include file="left.asp"--></td>
<td height="20" colspan="2"><img src="images/righttop.jpg" width="598" height="20"></td>
</tr>
<tr>
<td width="589" height="488" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr> </tr>
</table>
<img src="images/pingbanner.jpg" width="549" 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">
<area shape="rect" coords="51,19,128,40" href="#" onClick="MM_openBrWindow('tanchu.asp','','width=200,height=350')">
</map>
</div></td>
</tr>
</table>
</form></td>
<td width="9" background="images/rightright.jpg"></td>
</tr>
</table>
</body>
</html>
<% databaseclose()%>
<!--#include file="foot.asp"-->⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -