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> ><a href="manageruser.asp">人员管理</a> > 添加用户</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>
</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 + -
显示快捷键?