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

📄 count.asp

📁 一个基于ASP的学生管理系统
💻 ASP
字号:
<!--#include file="inc/conn.asp"-->
<!--#include file="inc/head.asp"-->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>学生信息管理系统—<%= session("xy_name") %>-统计报表</title>
</head>

<body>
<form action="report.asp" method="post">
<table width="990" border="0" cellpadding="0" cellspacing="0">
  <!--DWLayoutTable-->
  <tr>
    <td width="210" height="522" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">
      <!--DWLayoutTable-->
      <tr>
        <td width="210" height="522">&nbsp;</td>
      </tr>
    </table></td>
    <td width="554" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0" class="style4">
      <!--DWLayoutTable-->
      <tr>
        <td width="554" height="32" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0" class="style4">
          <!--DWLayoutTable-->
          <tr>
            <td width="166" height="32" valign="top">统计范围</td>
            <td width="388">&nbsp;</td>
          </tr>
        </table></td>
      </tr>
      <tr>
        <td height="68" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0" class="style4">
          <!--DWLayoutTable-->
          <tr>
            <td width="104" height="31" valign="top" class="style4">年级</td>
            <td width="450" valign="top" class="style4"><input name="intime" type="text" size="10">
            &nbsp;</td>
          </tr>
          <tr>
            <td height="37" valign="top" class="style4">院系</td>
            <td valign="top" class="style4">
	<% if session("ad_sign")="0" then  
    sql="SELECT xy_name FROM xueyuan"  
	openDB
    set rs=conn.execute(sql)%>
	<select name="xueyuan" >
	<option value="0"  selected >请选择</option>
	<% while not rs.eof %>
	<option value="<%= rs("xy_name") %>"><%= rs("xy_name") %></option>	 
	<% rs.movenext
	 wend
	 closeDB %>	
	</select>&nbsp;&nbsp;<select name="xi" >
	 <option value="0"  selected >请选择</option>
	<% openDB 
	sql="SELECT xy_name,xy_id FROM xueyuan"
	 set rs=conn.execute(sql) 
	 while not rs.eof
	 xy_name=rs("xy_name")
	 xy_id= rs("xy_id")
	 sql="SELECT x_name FROM xi WHERE xy_id='"&xy_id&"'"
	 set myrs=conn.execute(sql)
	  %>
    <option value="<%= rs("xy_name") %>">&#8212;&#8212;<%= rs("xy_name") %>&#8212;&#8212;</option>	 
    <% while not myrs.eof%>
    <option value="<%= myrs("x_name") %>"><%= myrs("x_name") %></option>	
    <% myrs.movenext
	 wend
	 rs.movenext
	 wend
	 closeDB
	  %> </select>
	  <% else %>
	  <input name="xueyuan" type="text" size="15" readonly="true" value="<%= session("xy_name") %>">&nbsp;&nbsp;
	 <% openDB 
	  xy_name=session("xy_name")
	 sql="SELECT xy_id FROM xueyuan where xy_name='"&xy_name&"'"
	 set rs=conn.execute(sql) 	
	 xy_id= rs("xy_id")
	 closeDB
	 openDB
	 sql="SELECT x_name FROM xi WHERE xy_id='"&xy_id&"'"
	 set rs=conn.execute(sql)
	  %><select name="xi" >
	    <option value="0"  selected >请选择</option>
	  <% while not rs.eof %>
	   <option value="<%= rs("x_name") %>"><%= rs("x_name") %></option>	
	 <% rs.movenext
	   wend
	   closeDB %>
	 </select><% end if %>	   </td>
          </tr>
        </table></td>
        </tr>
      <tr>
        <td height="55" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0" class="style4">
            <!--DWLayoutTable-->
            <tr>
              <td height="33" colspan="8" valign="top">附加条件</td>
            </tr>
            <tr>
              <td width="35" height="22" valign="top">性别</td>
              <td width="55" valign="top">
			  <select name="sex">
              <option value="0" selected>请选择</option>
              <option >女</option>
	          <option >男</option>
              </select></td>
              <td width="78" valign="top">职务</td>
              <td width="79" valign="top">
			  <% openDB
	          sql="SELECT zw_name FROM zhiwu"
	          set rs=conn.execute(sql) %>
	           <select name="zhiwu">
	           <option value="0" selected>请选择</option>
	            <% while not rs.eof %>
	             <option value="<%= rs("zw_name") %>"><%= rs("zw_name") %></option>	 
	            <% rs.movenext
	              wend
	             closeDB %>	
                  </select></td>
              <td width="70" valign="top">政治面貌</td>
              <td width="83" valign="top">
			  <% 
	           openDB
	           sql="SELECT zz_name FROM zhengzhi"
	          set rs=conn.execute(sql)
	             %>
	          <select name="zhengzhi">
	          <option value="0" selected>请选择</option>
	          <% while not rs.eof %>
              <option value="<%= rs("zz_name") %>"><%= rs("zz_name") %></option>	 
              <% rs.movenext
	             wend
	            closeDB %>	
              </select>			  </td>
              <td width="73" valign="top">生源地</td>
              <td width="81" valign="top">
			 <% openDB
	             sql="SELECT area_name FROM area"
	            set rs=conn.execute(sql) %>
	       <select name="area">
	      <option value="0" selected>请选择</option>
	      <% while not rs.eof %>
          <option value="<%= rs("area_name") %>"><%= rs("area_name") %></option>	 
          <% rs.movenext
	         wend
	         closeDB %>	
          </select>			  </td>
            </tr>
                </table></td>
      </tr>
      <tr>
        <td height="156" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0" class="style4">
            <!--DWLayoutTable-->
            <tr valign="middle">
              <td height="30" colspan="5">报表显示属性</td>
            </tr>
            <tr>
              <td width="103" height="25" valign="middle"><input name="ck_id" type="checkbox" value="id" checked> 
              &nbsp;ID</td>
              <td width="96" valign="middle"><input name="ck_username" type="checkbox" value="username" checked>
              &nbsp;姓名</td>
              <td width="108" valign="middle"><input name="ck_sex" type="checkbox" value="sex" checked>
              &nbsp;性别</td>
              <td width="112" valign="middle"><input name="ck_xueyuan" type="checkbox" value="xueyuan" checked>
              &nbsp;学院</td>
              <td width="135" valign="middle"><input name="ck_xi" type="checkbox" value="xi" checked> 
              &nbsp;系别</td>
            </tr>
            <tr>
              <td height="28" valign="middle"><input name="ck_time" type="checkbox" value="time" checked>
                年级</td>
              <td valign="middle"><input type="checkbox" name="ck_zhengzhi" value="zhengzhi">
              &nbsp;政治面貌</td>
              <td valign="middle"><input type="checkbox" name="ck_zhiwu" value="zhiwu">
              &nbsp;职务</td>
              <td valign="middle"><input type="checkbox" name="ck_minzu" value="minzu">
              &nbsp;民族</td>
              <td valign="middle"><input type="checkbox" name="ck_bedadd" value="bedadd">
              &nbsp;学校住址</td>
            </tr>
            <tr>
              <td height="32" valign="middle"><input type="checkbox" name="ck_area" value="area">
              &nbsp;生源地</td>
              <td valign="middle"><input type="checkbox" name="ck_homeadd" value="homeadd">
              &nbsp;家庭住址</td>
              <td valign="middle"><input type="checkbox" name="ck_homephone" value="homephone">
              &nbsp;家庭联系电话</td>
              <td valign="middle"><input type="checkbox" name="ck_mobliephone" value="mobliephone">
              &nbsp;联系电话</td>
              <td vvalign="middle"><!--DWLayoutEmptyCell-->&nbsp;</td>
            </tr>
            <tr align="right" valign="middle">
              <td height="41" colspan="4" align="left" valign="middle">填写报表名称&nbsp;&nbsp;&nbsp;&nbsp;
                <input name="ck_tabname" type="text" id="tabname"></td>
              <td valign="top"><input type="submit" name="Submit" value="生成报表"></td>
              </tr>
        </table></td>
      </tr>
      <tr>
        <td height="211">&nbsp;</td>
      </tr>
    </table></td>
    <td width="226" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">
      <!--DWLayoutTable-->
      <tr>
        <td width="226" height="522">&nbsp;</td>
      </tr>
    </table></td>
  </tr>
</table>
</form>
</body>
</html>
<!--#include file="inc/foot.asp"-->

⌨️ 快捷键说明

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