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

📄 student_list.asp

📁 本系统适用于选择题(单选和多选)的练习和考试.主要有七大模块:学习信息、经验交流、学生练习、学生考试、试卷管理、题库操作、身份 资料、成绩查询、系统帮助。超级管理员还可进行系统设置
💻 ASP
字号:
<!--#include file="open.asp" -->
<!--#include file="inc/md5.inc" -->
<%self_name="student_list.asp"%>
<%
  doing=request.querystring("doing")
  if doing="login" then  '用户登录
      user_id=trim(request.form("user_id"))
	  pass=trim(request.form("pass"))
	  if user_id<>"" and pass<>"" and instr(user_id,"'")=0 and instr(user_id,"&")=0 then
	      pass=ucase(md5(pass))
		  str="select * from user_teacher where teacher_user='"&user_id&"' and teacher_pass='"&pass&"'"
		  set rs=conn.execute(str)
		  if not rs.eof then
		      session("zzteacher")=true
			  session("name")=rs("teacher_name")
			  session("teacher_user")=user_id
			  if rs("teacher_class")="超级管理员" then session("zzadmin")=true end if
		  else
		      str="select * from user_student where 学籍号='"&user_id&"' and 密码='"&pass&"'"
		      set rs=conn.execute(str)
			  if not rs.eof then
			     session("zzstudent")=true
				 session("student_id")=user_id
				 session("name")=rs("姓名")
				 session("student_bj")=rs("班级")
			  end if
		  end if
	  end if
  end if
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head><!--#include file="inc/css.css" -->
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>留溪在线考试</title>
</head>

<body topmargin="1">
<!--#include file="top.asp" -->
<!--#include file="menu.asp" -->
<table width="770" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#ff99cc" bgcolor="#edebdb">
<%if session("zzteacher")=true or session("zzstudent")=true then%>
  <tr> 
    <td height="20" class="unnamed12"><div align="center">用户已登录 用户类别:
	<%if session("zzstudent")=true then%>学生 学籍号:<%=session("student_id")%> 姓名:<%=session("name")%> 班级:<%=session("student_bj")%><%end if%>
	<%if session("zzteacher")=true then%>教师 姓名:<%=session("name")%><%end if%>
	 <%if session("zzadmin")=true then%><a href=system_setup.asp>系统设置</a><%end if%>
         <a href="quit.asp">退出</a></div></td>
  </tr>
<%else%>
  <tr> 
    <td height="20" class="unnamed12"> <form name="form1" method="post" action="<%=self_name%>?doing=login">
        <div align="center">用户登录 输入学籍号或用户名: 
          <input name="user_id" type="text" id="user_id" value=<%=id_disp%> size="20">
           密码: 
          <input name="pass" type="password" id="pass" size="16">
            
          <input type="submit" name="Submit" class="unnamed12" value="登录">
            
          <input type="reset" name="Submit2" class="unnamed12" value="重填">
            <a href="reg.asp?back=<%=self_name%>">注册</a> <a href="rereg.asp">忘记密码</a></div>
      </td></form>
  </tr>
<%end if%>
</table>
<table width="770" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td class="unnamed4"> </td>
  </tr>
</table>
<%if session("zzteacher")=true then%>

<table width="770" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#ff99cc" bgcolor="#edebdb">
  <tr>
    <td width="200" valign="top"><table width="163" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr> 
          <td class="unnamed10"> </td>
        </tr>
        <tr> 
          <td background="images/top01.gif" class="unnamed10"> </td>
        </tr>
        <tr> 
          <td height="30" background="images/mid01.gif" class="unnamed14"> <div align="center"><strong>学生信息操作</strong></div></td>
        </tr>
        <tr> 
          <td height="30" background="images/mid01.gif" class="unnamed12"> <div align="center"><a href="student_insert.asp" class="unnamed12wu">增加学生</a></div></td>
        </tr>
        <tr>
          <td height="30" background="images/mid01.gif" class="unnamed12"><div align="center"><a href="student_list.asp" class="unnamed12wu">浏览编辑</a></div></td>
        </tr>
<%if session("zzadmin")=true then%>
        <tr> 
          <td height="30" background="images/mid01.gif" class="unnamed12"> <div align="center"><a href="teacher_edit.asp" class="unnamed12wu">增删教师</a></div></td>
        </tr>
<%end if%>
        <tr> 
          <td background="images/bottom01.gif" class="unnamed10"> </td>
        </tr>
        <tr> 
          <td class="unnamed10"> </td>
        </tr>
      </table></td>
    <td width="570" valign="top">
	
<%'删除学生
work=request.querystring("work")
if work="dele" then
   dele_id=request.querystring("dele_id")
   str="delete from user_student where id="&dele_id&""
   conn.execute(str)
end if
work=""
dele_id=""
conn.close%>
<!--#include file="open.asp" -->
<%
  str="select id,班级,学籍号,姓名,初始密码 from user_student"
  rs.open str,conn,3,2
   rs.pagesize=50
   pageno=1
   'doing=request.querystring("doing")
   if doing="quer" then
       pageno=cint(request.querystring("pageno"))
       if pageno="" or pageno=0 then
          pageno=1
       end if
   end if
   if doing="former" then
       pageno=int(trim(request.form("pageno")))
	   if isnumeric(pageno)<>true or pageno<1 or pageno>rs.pagecount then
	       pageno=1
	   end if
   end if
  %>

	<table width="400" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td class="unnamed10"> </td>
        </tr>
      </table>

      <table width="500" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td>
<%if pageno>1 then%>
   <a href=student_list.asp?doing=quer&pageno=<%=pageno-1%> class="unnamed12">上一页</a>
<%end if%>
<%if pageno=1 then%>
  <a href=student_list.asp?doing=quer&pageno=<%=rs.pagecount%> class="unnamed12">上一页</a>
<%end if%>
		  
              <% if rs.pagecount<=7 then
			        for p=1 to rs.pagecount
                      response.write "<a href=student_list.asp?doing=quer&pageno="&p&" class=unnamed12>["&p&"]</a> "
                    next
				 else
			        for p=1 to 7
                      response.write "<a href=student_list.asp?doing=quer&pageno="&p&" class=unnamed12>["&p&"]</a> "
                    next
                      response.write "… <a href=student_list.asp?doing=quer&pageno="&rs.pagecount&" class=unnamed12>["&rs.pagecount&"]</a> "
				 end if%>
<%if pageno<rs.pagecount then%>
           <a href=student_list.asp?doing=quer&pageno=<%=pageno+1%> class="unnamed12">下一页</a>
<%end if%>
<%if pageno>=rs.pagecount then%>
           <a href=student_list.asp?doing=quer&pageno=1 class="unnamed12">下一页</a>
<%end if%></td>
          <td width="130" class="unnamed12"> 
            <form name="form1" method="post" action="student_list.asp?doing=former">
              转到第
              <input name="pageno" type="text" id="pageno" size="3">
              <input type="submit" name="Submit" value="GO">
            
		  </td></form>
        </tr>
      </table>

      <table width="500" border="1" align="center" cellpadding="0" cellspacing="0">
        <tr class="unnamed14"> 
          <td width="100" height="30" bgcolor="#CCCCCC"> <div align="center">班级</div></td>
          <td width="150" height="30" bgcolor="#CCCCCC"> 
            <div align="center">学籍号</div></td>
          <td width="80" bgcolor="#CCCCCC"><div align="center">初始密码</div></td>
          <td width="80" height="30" bgcolor="#CCCCCC"> 
            <div align="center">姓名</div></td>
          <td width="80" bgcolor="#CCCCCC"> 
            <div align="center">操作</div></td>
        </tr>
        <%
   rs.absolutepage=pageno
   for n=1 to rs.pagesize%>
        <tr class="unnamed12"> 
          <td width="100" height="20"> <div align="center"><%=rs("班级")%></div></td>
          <td width="150" height="20"> 
            <div align="center"><%=rs("学籍号")%></div></td>
          <td width="80" height="20"><div align="center"><%=rs("初始密码")%></div></td>
          <td width="80" height="20"> 
            <div align="center"></div>
            <div align="center"><%=rs("姓名")%></div></td>
          <td width="80" height="20"> 
            <div align="center"><a href="student_list.asp?doing=quer&dele_id=<%=rs("id")%>&work=dele&pageno=<%=pageno%>"><img src="images/delete.gif" alt="删除 <%=rs("姓名")%>" width="11" height="14" border="0"></a>  <a href="student_edit.asp?edit_id=<%=rs("id")%>"><img src="images/edit.gif" alt="编辑修改" width="18" height="18" border="0"></a></div></td>
        </tr>
        <%  rs.movenext
    if rs.eof then exit for
    next%>
      </table>

      <table width="500" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td>
<%if pageno>1 then%>
   <a href=student_list.asp?doing=quer&pageno=<%=pageno-1%> class="unnamed12">上一页</a>
<%end if%>
<%if pageno=1 then%>
  <a href=student_list.asp?doing=quer&pageno=<%=rs.pagecount%> class="unnamed12">上一页</a>
<%end if%>
		  
              <% if rs.pagecount<=7 then
			        for p=1 to rs.pagecount
                      response.write "<a href=student_list.asp?doing=quer&pageno="&p&" class=unnamed12>["&p&"]</a> "
                    next
				 else
			        for p=1 to 7
                      response.write "<a href=student_list.asp?doing=quer&pageno="&p&" class=unnamed12>["&p&"]</a> "
                    next
                      response.write "… <a href=student_list.asp?doing=quer&pageno="&rs.pagecount&" class=unnamed12>["&rs.pagecount&"]</a> "
				 end if%>
<%if pageno<rs.pagecount then%>
           <a href=student_list.asp?doing=quer&pageno=<%=pageno+1%> class="unnamed12">下一页</a>
<%end if%>
<%if pageno>=rs.pagecount then%>
           <a href=student_list.asp?doing=quer&pageno=1 class="unnamed12">下一页</a>
<%end if%></td>
          <td width="130" class="unnamed12"> 
            <form name="form1" method="post" action="student_list.asp?doing=former">
              转到第
              <input name="pageno" type="text" id="pageno" size="3">
              <input type="submit" name="Submit" value="GO">
            
		  </td></form>
        </tr>
      </table>

      <div align="center"><font color="#FF0000"><span class="unnamed14h20"> </span></font></div>
      <table width="400" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td class="unnamed10">  </td>
        </tr>
      </table></td>
  </tr>
</table>
<%end if%>

<!--#include file="inc/bottom.asp" -->
<%conn.close%>
</body>
</html>

⌨️ 快捷键说明

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