manageruseradd2.asp

来自「网络考试系统最终备份」· ASP 代码 · 共 67 行

ASP
67
字号
<!--#include file="conn.inc"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>添加用户</title>

<script language="javascript">
function dsubmit()
{var myform=document.form1;
 var bool=true;
 if (myform.department.value=="")
   { alert("请选择用户所属的学校!");
     myform.department.focus();
     bool=false;
   }
  return bool; 
}
</script>

</head>

<body>
<table width="100%" height="25" border="0" cellspacing="0" bordercolor="#111111" id="AutoNumber2" style="border-collapse: collapse">
  <tr>
    <td width="100%">当前位置:<a href="news.asp">系统管理</a> &gt;<a href="manageruser.asp">人员管理</a> &gt; 添加用户</td>
  </tr>
</table>
<form name="form1" method="post" action="manageruseradd3.asp" onSubmit="return dsubmit()">
  <table width="100%" height="20%"  border="1">
    <tr bgcolor="#CCCCCC">
      <td colspan="2"><div align="center"><strong>请选择用户所在院系</strong></div></td>
    </tr>
    <tr>
      <td width="14%" height="38"><div align="center"><strong>院系</strong></div></td>
      <td width="86%">
	  <select name="department" id="department">
        <option>选择院系</option>
		<%
		v_college=request("college")
		
		session("TempCollege")=v_college
		
		  sql2="select * from department_info where College_ID="&v_college&""
		  set rs2=server.createobject("adodb.recordset")
          rs2.open sql2,conn,3,2
		  while not rs2.eof
		%>
        <option value="<%=rs2("DepID")%>"><%=rs2("DepName")%></option>
		<%
		  rs2.movenext
		  wend
		  rs2.close
		
		%>
      </select>
	  &nbsp;</td>
    </tr>
    <tr>
      <td colspan="2"><div align="center">
        <input type="submit" name="Submit" value="下一步">
      </div></td>
    </tr>
  </table>
</form>
</body>
</html>

⌨️ 快捷键说明

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