manageruseradd3.asp

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

ASP

65 行

<!--#include file="conn.inc"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>添加用户</title>
<script language="javascript">
function msubmit()
{var myform=document.form1;
 var bool=true;
 if (myform.mayjor.value=="")
   { alert("请选择用户所属的专业！");
     myform.mayjor.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="manageruseradd4.asp" onSubmit="return msubmit()">
  <table width="100%" height="20"  border="1">
    <tr bgcolor="#CCCCCC">
      <td colspan="2"><div align="center"><strong>请选择用户所属专业</strong></div></td>
    </tr>
    <tr>
      <td width="15%"><div align="center"><strong>专业</strong></div></td>
      <td width="85%">
	  <select name="mayjor" id="mayjor">
        <option>选择专业</option>
		<%
		v_department=request("department")
		session("TempDepartment")=v_department
		
		  sql2="select * from mayjor_info where Dep_ID="&v_department&" and College_ID="&session("TempCollege")&""
		  set rs2=server.createobject("adodb.recordset")
          rs2.open sql2,conn,3,2
		  while not rs2.eof
		%>
        <option value="<%=rs2("MayjorID")%>"><%=rs2("MayjorName")%></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>

manageruseradd3.asp - 源码说明

本页面展示了「网络考试系统最终备份」中的 manageruseradd3.asp 源码文件，采用 ASP 编程语言编写，共 65 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

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

⌨️ 快捷键说明

复制代码Ctrl + C

搜索代码Ctrl + F

全屏模式F11

增大字号Ctrl + =

减小字号Ctrl + -

显示快捷键?