📄 elogin.asp

📁 应用于高等院校党团思想教育

💻 ASP

字号:


<!--#include file="conn.asp"-->
<!-- #include file="inc/const.asp" -->
<html>

<head>
<title><%=ForumName%>--管理登陆</title>
<link rel="stylesheet" href="forum.CSS">

</head>
<body bgcolor="#ffffff" alink="#333333" vlink="#333333" link="#333333">
<%
   	dim sql,rs
   	set rs=server.createobject("adodb.recordset")
   	sql="select boardid,boardtype from board"
   	rs.open sql,conn,1,1
%>
<div align="center"><center>

<form method="POST" action="echklogin.asp">
      <table cellpadding=0 cellspacing=0 border=0 width=70% bgcolor=<%=atablebackcolor%> align=center>
        <tr>
          <td><table cellpadding=3 cellspacing=1 border=0 width=100%>
            <tr>
              <td colspan="2" height="22" bgcolor=<%=atabletitlecolor%> align=center>
管理员登陆
	      </td>
            </tr>
		<tr bgcolor=<%=tablebodycolor%>><td width="33%" align="right">版面:</td>
		<td width="67%"><select name="Boardid" size="1">
	  <%
	if rs.eof and rs.bof then
		    response.write "<option value=0>没有版面"
	else
	     do while not rs.eof
		    response.write "<option value='"+CStr(rs("BoardID"))+"'>"+rs("Boardtype")+"</option>"+chr(13)+chr(10)
		    rs.movenext
             loop
	end if
	  %>        
      </select></td>
            <tr bgcolor=<%=tablebodycolor%>>
                      <td width="33%" align="right" height="30">用户名：</td>
              <td width="67%"><input name="username" maxlength="20" size="20"> </td>
            </tr>
            <tr bgcolor=<%=tablebodycolor%>>
                      <td width="33%" align="right" height="30">密 码：</td>
              <td width="67%"><input type="password" name="password" maxlength="16" size="20"> </td>
            </tr>
            <tr>
              <td colspan="2" height="15" bgcolor=<%=atabletitlecolor%> align=center>
                  <input type="submit" name="Submit" value="确 定"> 
          &nbsp; 
                  <input type="reset" name="Submit2" value="重 写">
	      </td>
            </tr>
          </table>
          </td>
        </tr>
      </table>
    </form>
</center></div>
<!--#include file="footer.asp"-->
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -