⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 login.asp

📁 单班同学录 一个非常漂亮的同学录 哦
💻 ASP
字号:
<%@LANGUAGE="VBScript" CODEPAGE="936"%>
<!--#include file="CONN.asp" -->
<!--#include file="MD5.asp" -->
<%
Response.Buffer = True 
Response.ExpiresAbsolute = Now() - 1 
Response.Expires = 0 
Response.CacheControl = "no-cache" 

session("username")=""
session("realname")=""
session("usergroup")=""

strsql="select classmode,code from config"
set rs=conn.execute(strsql)
classcode=rs("code")
classmode=rs("classmode")
rs.close
set rs=nothing

'验证版本
'regcode=Request.ServerVariables("SERVER_NAME")
'regcode=left(MD5(regcode),12)
'If classcode="" or regcode<>classcode Then
	'response.Redirect("reg.asp")
'end if

'/********检查是否至少存在一位管理员,否则自动创建**********/
strsql="select * from [user] where isvalid=true and usergroup='3'"
set rs=server.CreateObject("adodb.recordset")
rs.open strsql,conn,1,2
if rs.eof then
	rs.addnew
	rs("username")="admin"
	rs("passwd")=md5("admin")
	rs("email")="mayaclass@cnmaya.org"
	rs("realname")="班长"
	rs("usergroup")=3
	rs("isvalid")=true
	rs("logno")=0
	rs.update
	conn.execute("insert into loginfo (loguser) values('admin')")
end if
rs.close
set rs=nothing

if request.ServerVariables("REQUEST_METHOD")="POST" Then
	username=replace(trim(request.Form("text1")),"'","")
	passwd=replace(trim(request.Form("text2")),"'","")
	passwd=md5(passwd)
	strsql="select username,passwd,realname,usergroup,logno from [user] where username='"&username&"' and passwd='"&passwd&"' and isvalid=true"
	set rs=server.CreateObject("adodb.recordset")
	rs.open strsql,conn,1,3
	if not rs.eof then
		if not (rs("usergroup")=1 and classmode=3) then
			session("username")=username
			session("realname")=rs("realname")
			session("usergroup")=rs("usergroup")
			rs("logno")=rs("logno")+1
			rs.update
			rs.close
			
			strsql="select * from loginfo where loguser='"&username&"'"
			rs.open strsql,conn,1,3
			rs("logtime")=now()
			rs("isonline")=true
			rs("SessionID")=session.sessionId
			rs.update
			rs.close
			set rs=nothing
			CloseDatabase
			Response.Redirect("index.asp")
		else
			errmsg="<li>您还没有通过验证!"
		end if
	else
		errmsg="<li>您的用户名不存在或您输入的密码不正确!"
	end if	
end If
%>
<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta http-equiv="Content-Language" content="zh-cn">
<title><%=classname%>同学录</title>
<link href="css/class.css" type=text/css rel=stylesheet>
  <script language="JavaScript">
<!--
function checkform(){
if (form1.text1.value ==""){
		alert("请输入用户名称!");
		form1.text1.focus();
		return false;}
if (form1.text2.value ==""){
			alert("请输入用户密码!");
			form1.text2.focus();
			return false;}
form1.submit();
}
//-->
</script>
</head>

<body background="images/1.GIF" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table width="776" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr> 
    <td colspan="3"><img src="images/top_t.gif" width="776" height="43"></td>
  </tr>
  <tr> 
    <td width="138"><img src="images/top_l.gif" width="138" height="39"></td>
    <td width="584" align="right" bgcolor="#666B52"><a href="index.asp"><img src="images/toplogo.gif" width="200" height="39" border="0"></a></td>
    <td width="54"><img src="images/top_r.gif" width="54" height="39"></td>
  </tr>
  <tr> 
    <td colspan="3"><table width="776" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td width="120" rowspan="2" valign="top" background="images/left_x.gif"><img src="images/left_img.gif" width="120" height="480"></td>
          <td rowspan="2" valign="top" bgcolor="#F2F2EA"> <div align="center"> 
              <!--#include file="top.asp" -->
            </div>
            <table width="618" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td valign="top"> <div align="center"><br>
                    <!--#include file="left.asp" -->
                  </div></td>
                <td width="10">&nbsp;</td>
                <td width="418" valign="top"><table width="400" border="0" align="center" cellpadding="1" cellspacing="3" class="font1">
                    <tr> 
                      <td width="459">您的位置&gt;班级成员登录</td>
                      <td width="27"> </td>
                    </tr>
                  </table>
                  <div align="center"> 
                    <table width="400" border="0" cellspacing="0" cellpadding="0">
                      <tr> 
                        <td><table width="400" border="0" cellpadding="0" cellspacing="0" background="images/gnymtbz.gif">
                            <tr> 
                              <td width="135"><img src="images/cydl.gif" width="135" height="36"></td>
                              <td>&nbsp;</td>
                              <td width="100"><img src="images/gnymtyb.gif" width="100" height="36"></td>
                            </tr>
                          </table></td>
                      </tr>
                      <tr> 
                        <td><table width="400" border="0" cellpadding="0" cellspacing="0" background="images/n_bk.gif">
                            <tr> 
                              <td><form name="form1" method="post" action="login.asp?method=submit" onSubmit="return checkform()">
                                  <table width="100%" border="0" cellpadding="4" cellspacing="1" class="font1">
                                    <tr> 
                                      <td><%=errmsg%></td>
                                    </tr>
                                    <tr> 
                                      <td><table width="380" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#666B52">
                                          <tr> 
                                            <td><table width="100%" border="0" cellpadding="2" cellspacing="1">
                                                <tr bgcolor="#FFFFFF"> 
                                                  <td width="100" align="center" bgcolor="E3E3CF"><strong>用 
                                                    户 名:</strong></td>
                                                  <td bgcolor="#f1f1eb"> <input name="text1" type="text" class="input-box" id="text1" height="20"> 
                                                  </td>
                                                </tr>
                                                <tr bgcolor="#FFFFFF"> 
                                                  <td align="center" bgcolor="E3E3CF"><strong>密  码:</strong></td>
                                                  <td bgcolor="#f1f1eb"><input name="text2" type="password" class="input-box" id="text2" height="20"></td>
                                                </tr>
                                              </table></td>
                                          </tr>
                                        </table></td>
                                    </tr>
                                    <tr> 
                                      <td><div align="center"> 
                                          <input type="submit" name="Submit" value="提交">
                                          &nbsp;&nbsp; 
                                          <input type="reset" name="Submit2" value="重置">
                                        </div></td>
                                    </tr>
                                  </table>
                                </form></td>
                            </tr>
                          </table></td>
                      </tr>
                      <tr> 
                        <td><img src="images/n_foot.gif" width="400" height="10"></td>
                      </tr>
                    </table>
                  </div></td>
              </tr>
            </table></td>
          <td width="38" valign="top" background="images/right_b.gif"><img src="images/right_b.gif" width="38" height="5"></td>
        </tr>
      </table></td>
  </tr>
  <tr> 
    <td colspan="3"><img src="images/z_f.gif" width="776" height="26"></td>
  </tr>
  <tr>
    <td colspan="3">&nbsp;</td>
  </tr>
</table>         
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -