?? logint.asp
字號:
<!--#INCLUDE FILE="config.asp" -->
<!--#INCLUDE FILE="background.asp"-->
<!--#INCLUDE FILE="md5.asp"-->
<%
Response.Buffer = True
Response.Expires = -1
Response.ExpiresAbsolute = Now() - 1
Response.Expires = 0
Response.CacheControl = "no-cache"
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>※寧波職業技術學院-=-心理咨詢與人才測評中心※ -=- 登入</title>
<STYLE type=text/css>BODY {
SCROLLBAR-FACE-COLOR: #ffffff; SCROLLBAR-HIGHLIGHT-COLOR: #ffffff; SCROLLBAR-SHADOW-COLOR: #ffffff; SCROLLBAR-3DLIGHT-COLOR: #ffffff; SCROLLBAR-TRACK-COLOR: #ffffff; SCROLLBAR-DARKSHADOW-COLOR: #ffffff
}
A {
COLOR: #000000; TEXT-DECORATION: none
}
A:hover {
COLOR: #000000; BORDER-BOTTOM: 1px dotted
}
TABLE {
FONT-SIZE: 10pt; COLOR: #000000; FONT-FAMILY: Verdana
}
</STYLE>
<style type="text/css">
<!--
body,td,th {
color: #000000;
font-family: "宋體";
font-size: 9pt;
}
body {
background-color: #666F74;
}
.unnamed1 {
font-family: "宋體";
font-size: 9pt;
color: #FFFFFF;
font-weight: bold;
}
.unnamed11 { color: #FFFFFF;
font-weight: bold;
filter: DropShadow(Color=#2C60B2, OffX=1, OffY=1, Positive=1);
}
input {
font-family: "宋體";
font-size: 9pt;
height: 20px;
vertical-align: middle;
}
.copybg {
background-image: url(img/cong.gif);
background-repeat: no-repeat;
background-position: left bottom;
}
-->
</style>
<script language="JavaScript" type="text/JavaScript">
<!--
//window.resizeTo(800,600);
//window.moveTo(0,0);
</script>
<SCRIPT language=JavaScript type=text/JavaScript>
<!--
function MM_reloadPage(init) { //reloads the window if Nav4 resized
if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
function MM_callJS(jsStr) { //v2.0
return eval(jsStr)
}
//-->
function ow(obj) {
URL=obj.href;
window.open(URL,'Preview','scrollbars=no,toolbars=no,status=no,menubar=no,resizable=no,width=550,height=450,left=50,top=110');
return false;
}
</script>
<STYLE type=text/css>.layer {
COLOR: #ffffff; FILTER: Alpha(Opacity=50, FinishOpacity=50, Style=1, StartX=0, StartY=0, FinishX=100, FinishY=100)
}
.logo {
BACKGROUND-IMAGE: url(img/login_back.png); BACKGROUND-REPEAT: no-repeat; HEIGHT: 277px
}
.font-nomal {
FONT-FAMILY: "宋體"; FONT-SIZE: 10pt
}
.input_line {
BACKGROUND-COLOR: #7d9cbf; BORDER-BOTTOM: #000000 1px solid; BORDER-LEFT: 0px solid; BORDER-RIGHT: 0px solid; BORDER-TOP: 0px solid
}
.title {
FILTER: Glow(Color=#0000ff, Strength=3)
}
</STYLE>
</head>
<BODY oncontextmenu="return false" onselectstart="return false"
ondragstart="return false" onbeforecopy="return false"
leftMargin=0
background=img/900.jpg topMargin=0
marginheight="0" marginwidth="0" style="background-attachment: fixed">
<div align="center">
<table border="0" width="762">
<tr>
<td height="719" align="center" valign="top" bgcolor="#C0C0C0">
<table border="0" width="100%" bgcolor="#FFFFFF" height="58">
<tr> <td >
<div style="position: absolute; width: 100px; height: 100px; z-index: 1; left: 183px; top: 92px" id="layer1">
<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="443" height="100">
<param name="movie" value="img/49.swf">
<param name="quality" value="High">
<param name="wmode" value="transparent">
<embed src="img/49.swf" width="443" height="100" quality="High" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" wmode="transparent"></embed></object>
</div>
<table border="0" width="100%">
<tr>
<td>
<img border="0" src="img/qq.jpg" width="277" height="51"></td>
<td>
<% Set rs10=server.createobject("ADODB.RECORDSET")
rs10.open "Select * From option1",Conn,3,3
%>
<div align="center"><%if rs10("bannerImg")<>"" and rs10("bannerImg")<>" " then%>
<%if right(rs10("bannerImg"),3)="swf" then%>
<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="409" height="51">
<param name="movie" value="http://<%=rs10("bannerImg")%>">
<param name="quality" value="High">
<embed src="http://<%=rs10("bannerImg")%>" quality="High" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="409" height="51"></embed>
</object>
<%else%>
<a href="<%=rs10("bannerImgLink")%>">
<img src="<%=rs10("bannerImg")%>" border="0" ></a>
<%end if%><%end if%></td>
</tr>
</table>
<img border="0" src="img/1.jpg" width="755" height="137"><br><a href="index.asp"><IMG onmouseover="this.src='img/111.jpg'"
onmouseout="this.src='img/11.jpg'"
src="img/11.jpg" border=0></a><a href="loginT.asp"><IMG onmouseover="this.src='img/122.jpg'"
onmouseout="this.src='img/12.jpg'"
src="img/12.jpg" border=0></a><a href="loginT.asp"><IMG onmouseover="this.src='img/133.jpg'"
onmouseout="this.src='img/13.jpg'"
src="img/13.jpg" border=0></a><a href="loginT.asp"><IMG onmouseover="this.src='img/144.jpg'"
onmouseout="this.src='img/14.jpg'"
src="img/14.jpg" border=0></a><a href="loginT.asp"><IMG onmouseover="this.src='img/177.jpg'"
onmouseout="this.src='img/17.jpg'"
src="img/17.jpg" border=0></a><a href="loginT.asp"><IMG onmouseover="this.src='img/166.jpg'"
onmouseout="this.src='img/16.jpg'"
src="img/16.jpg" border=0></a><img border="0" src="img/4.jpg" width="246" height="111"><br>
<img border="0" src="img/1.bmp" width="755" height="24"><br>
<img border="0" src="img/12.bmp" width="30" height="24"><MARQUEE height=16 scrollAmount=2 scrollDelay=10 align="middle" width="446" style="color: #FF9900">
<%=rs11("lygg")%>
</MARQUEE><img border="0" src="img/333.jpg" width="279" height="25">
</table>
<table border="0" width="100%" bgcolor="#FFFFFF" height="405">
<tr>
<td align="center" bgcolor="#FFFFFF"><form name="form" method="post" onSubmit="return CheckForm();">
<div align="center">
<table width="34%" cellpadding="5" cellspacing="1" bordercolorlight="#000000" border="0" bordercolordark="#FFFFFF" bgcolor="#FFFFFF">
<%
main()
sub main()
dim backInput, homeInput
backInput=backInput&"<br><br><input type=button value=返回前頁 onClick=history.back() class=input2 name=button ><br>"
backInput=backInput&"</d>"
backInput=backInput&"</tr>"
homeInput="<br><br><input type=button value=點我進入平臺 onClick=""location.href='index.asp' "" class=input2><br>"
homeInput=homeInput&"</d>"
homeInput=homeInput&"</tr>"
if request.form="" then
%>
<tr >
<td width="247" align="center" bgcolor="#FFFFFF">
<TABLE bgColor=#000000 border=0 cellPadding=0 cellSpacing=1
class=layer id=dd
onmouseout="MM_callJS('change_style(dd,50);')"
onmouseover="MM_callJS('change_style(dd,100);')"
style="FILTER: Alpha(Opacity=50, FinishOpacity=50, Style=1, StartX=0, StartY=0, FinishX=100, FinishY=100)"
width="100%">
<TBODY>
<TR>
<TD align=middle bgColor=#254051 class=font-nomal
height=25 vAlign=bottom><font color="#FFFFFF">登入心理咨詢平臺</font></TD></TR>
<TR>
<TD bgColor=#7d9cbf vAlign=top>
<FORM action="" method=post name=form1>
<TABLE border=0 cellPadding=2 cellSpacing=0
class=font-nomal width="100%" height="130">
<TBODY>
<TR>
<TD colSpan=4> </TD></TR>
<TR>
<TD width="11%"> </TD>
<TD align=right noWrap width="22%">用戶名: </TD>
<TD noWrap width="54%"><INPUT class=input_line
id=username2 name=name size=15></TD>
<TD width="9%" align="left"> </TD></TR>
<TR>
<TD>
<P> </P></TD>
<TD align=right>密 碼: </TD>
<TD><INPUT class=input_line id=pwd2 maxLength=18
name=pass size=15 type=password></TD>
<TD align="left"> </TD></TR>
<TR>
<TD> </TD>
<TD align=right>驗證碼:</TD>
<TD><INPUT class=input_line id=RndNum name=CheckCode
size=15><img src="checkcode.asp"></TD>
<TD align="left"> </TD></TR>
<TR>
<TD height="24"> </TD>
<TD align=middle colSpan=2 height="24">
<table border="0" width="100%" cellspacing="0" cellpadding="0">
<tr>
<td align="center">
<INPUT border=0
height=20 name=imageField
src="img/x.gif" type=image
width=70></td>
<td align="center">
<p align="center">
<a target="_blank" href="register.asp" onclick="return ow(this)" ><img border="0" src="img/y.jpg" width="70" height="20"></a></td>
</tr>
</table>
</TD>
<TD height="24"> </TD></TR></TBODY></TABLE></FORM></TD></TR></TBODY></TABLE><%
else
dim name, pass, expTime
name=request.form("name")
pass=request.form("pass")
name=replace(name,"'","")
name=replace(name,"""","")
name=replace(name,"=","")
pass=replace(pass,"'","")
pass=replace(pass,"""","")
pass=replace(pass,"=","")
CheckCode=replace(Request("CheckCode"),"'","")
expTime=request.form("expTime")
if rs11("showcode") then
if session("CheckCode")="" then
response.Write("<tr align='center'>")
response.Write("<td>")
response.write "<font color=red>發生錯誤</font><br><br>你在登錄頁面停留時間過長,請重新返回登錄頁面進行登錄。"
response.write backInput
exit sub
end if
if CheckCode<>CStr(session("CheckCode")) then
response.Write("<tr align='center'>")
response.Write("<td>")
response.write "<font color=red>發生錯誤</font><br><br>您輸入的確認碼和系統產生的不一致,請重新輸入。"
response.write backInput
exit sub
end if
end if
if name="" or pass="" then
response.Write("<tr align='center'>")
response.Write("<td>")
response.write "<font color=red>發生錯誤</font><br><br>請輸入用戶名和密碼!"
response.write backInput
exit sub
end if
exec="Select * From register where username='"&name&"' and password1='"&md5(pass)&"'"
set rs=server.createobject("adodb.recordset")
rs.open exec,conn,1,1
if rs.eof then
response.Write("<tr align='center'>")
response.Write("<td>")
response.write "<font color=red>發生錯誤</font><br><br>用戶名不存在或密碼錯誤!"
response.write backInput
exit sub
end if
response.Write("<tr align='center'>")
response.Write("<td>")
response.write "<font color=red>登陸成功!<br>請點下面的按鈕進入!</font>"
response.write homeInput
cookiePath=request.servervariables("path_info")
cookiePath=left(cookiePath,instrRev(cookiePath,"/"))
response.cookies("ly").Path=cookiePath
response.cookies("ly")("useridname")=name
response.cookies("ly")("useridpassword")=pass
if rs("level1")="管理員" then response.cookies("ly")("admin")=1 else if rs("level1")="版主" then response.cookies("ly")("admin")=2 else response.cookies("ly")("admin")=0
if (expTime<>"") and (expTime<>"不保存") then
expTime=Cdate(expTime)
response.cookies("ly").expires=expTime
end if
end if
end sub %>
</td>
</tr>
<%if rs11("showcode") then%>
<%end if%>
</table>
</div>
</form></td>
</tr>
</table>
</td>
</tr>
<tr>
<td>
<p align="center"><!--#include file="boot.asp"--></td>
</tr>
</table>
</div>
<SCRIPT language=JavaScript type=text/JavaScript>
function change_style(obj,alpha){
//alert(obj.id);
obj.style.filter="Alpha(Opacity="+alpha+", FinishOpacity=50, Style=0, StartX=0, StartY=0, FinishX=100, FinishY=100)"
}
</SCRIPT>
</body>
</html>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -