elogin.asp

来自「应用于高等院校党团思想教育」· ASP 代码 · 共 65 行

ASP
65 行
字号 

<!--#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>

elogin.asp - 源码说明

本页面展示了「应用于高等院校党团思想教育」中的 elogin.asp 源码文件，采用 ASP 编程语言编写，共 65 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与应用于相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

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