📄 batchadd.asp
字号:
<!--#include file="../../System/Const.asp"-->
<!--#include file="../../System/misc.asp"-->
<%
set cn=server.CreateObject("ADODB.connection")
cn.Open DSN_ACLASS
set rsUser=server.CreateObject("ADODB.recordset")
rsUser.Open "select ID from "&TBL_USER&" where SCHOOLID="&session("school_id")&"",cn,adOpenStatic
usercount=rsUser.RecordCount
rsUser.close
if usercount>= session("school_max_user") then
Response.Write "<p align=center>对不起，您最多只能添加"&session("school_max_user")&"个用户。</p>"
Response.Write "<p align=center><a href='vbscript:history.back'>返回</a></p>"
cn.close
response.end
end if
set rs=server.CreateObject("ADODB.recordset")
%>
<HTML>
<BODY bgcolor="#CFC9CD" leftmargin="0" topmargin="10" >
<!--#include file="Header.asp"-->
<table width="770" border="0" cellspacing="0" cellpadding="0" bgcolor="#FFFFFF" align="center" height="70%">
<tr>
<td bgcolor="#8C9A8C" width="3"></td>
<td width="764" bgcolor="#EFEFEF" height="20" valign="bottom"> 你现在的位置：用户管理－批量添加用户</td>
<td bgcolor="#8C9A8C" width="3"></td>
</tr>
<tr>
<td bgcolor="#8C9A8C" width="3"></td>
<td width="764"> </td>
<td bgcolor="#8C9A8C" width="3"></td>
</tr>
<tr>
<td bgcolor="#8C9A8C" width="3"></td>
<td width="764" valign="top">
<form name="form1" method="post" action="batchadd2.asp">
<table width="86%" border="1" align="center" bgcolor="#E3E3E3">
<tr bgcolor="EFEFEF">
<td width="29%">用户名</td>
<td width="71%" bgcolor="EFEFEF">
<input alt="用户名***" type=text name=user_username>
*** (不超过20个字符)</td>
</tr>
<tr bgcolor="EFEFEF">
<td width="29%">昵称</td>
<td width="71%">
<input alt="昵称***" type=text name=user_nickname>
*** (不超过20个字符)</td>
</tr>
<tr bgcolor="EFEFEF">
<td width="29%">密码</td>
<td width="71%">
<input type=text name=user_password >
(不超过20个字符)
<input type="checkbox" name="user_pwdasuser" value="true" checked>
密码和用户名相同 </td>
</tr>
<tr bgcolor="EFEFEF">
<td width="29%">客户端登录时校验机器硬件ID</td>
<td width="71%">
<input type="checkbox" name="user_verify_hid" value="True">
需要校验 硬件ID:
<input type="text" name="user_hid" value="">
</td>
</tr>
<tr bgcolor="EFEFEF">
<td width="29%">用户类型</td>
<td width="71%">
<input type=hidden name=user_type value=<%=UTP_STUDENT%>>
会员 </td>
</tr>
<tr bgcolor="EFEFEF">
<td width="29%">性别</td>
<td width="71%">
<select name="user_sex" alt>
<%
rs.Open "select * from DIC_SEX", cn
rs.movefirst
do while not rs.eof %>
<option <%=SELECTED(1, rs("ID"))%> value=<% =rs("id")%>>
<% =rs("name")%>
</option>
<% rs.movenext
loop
rs.Close
%>
</select>
</td>
</tr>
<tr bgcolor="EFEFEF">
<td width="32%">广播接收协议</td>
<td width="68%">
<select name="user_protocol" alt>
<%
rs.Open "select * from DIC_PROTOCOL", cn
rs.movefirst
do while not rs.eof %>
<option <%=SELECTED(clng(request("user_protocol")), rs("ID"))%> value=<% =rs("id")%>>
<% =rs("name")%>
</option>
<% rs.movenext
loop
rs.Close
%>
</select>
</td>
</tr>
<tr bgcolor="EFEFEF">
<td width="29%">EMail</td>
<td width="71%">
<input type=text name=user_mailadd >
</td>
</tr>
<tr bgcolor="EFEFEF">
<td width="29%">序号基数 </td>
<td width="71%">
<input type=text alt="序号基数***" name=user_count_base value=1>
*** </td>
</tr>
<tr bgcolor="EFEFEF">
<td width="29%">批量添加人数 (注：系统将自动在“用户名”，“昵称”后面按序号基数递增。如“用户名”是sss,基数为9,添加用户数为7,那么入库的“用户名”将是sss9,
sss10, ..., sss15) </td>
<td width="71%">
<input type=text alt="用户数#1#100#<<<" name=user_count value=1>
(1 ~ 100)*** </td>
</tr>
<tr bgcolor="EFEFEF">
<td width="29%">赋予会议室的开会权限</td>
<td width="71%">
<%
rs.Open "select * from CLASS where SCHOOLID="&session("school_id")&" order by NAME", cn, adOpenStatic
cur_class=0 %>
<table width="100%" border="0">
<tr>
<td valign="top">
<%do while not rs.eof and cur_class<rs.RecordCount/2%>
<input type="checkbox" name="class_id" value=<%=rs("id")%> unchecked>
<% =rs("name")%>
<br>
<% rs.movenext
cur_class=cur_class+1
loop%>
</td>
<td valign="top">
<%do while not rs.eof and cur_class<=rs.RecordCount%>
<input type="checkbox" name="class_id" value=<%=rs("id")%> unchecked>
<% =rs("name")%>
<br>
<% rs.movenext
cur_class=cur_class+1
loop%>
</td>
</tr>
</table>
<% rs.Close %>
</td>
</tr>
<tr bgcolor="EFEFEF">
<td colspan="2">
<div align="center">
<input type="button" value="确定" onClick="jscript:OnSubmitGeneral(form1)" name="buttonsubmit">
<input type="button" value="返回" onClick="jscript:OnReturn()" name="button">
</div>
</td>
</tr>
</table>
</form>
</td>
<td bgcolor="#8C9A8C" width="3"></td>
</tr>
<tr>
<td bgcolor="#8C9A8C" width="3" height="21"></td>
<td width="764" bgcolor="EFEFEF" height="21">
<div align="center"><%=COMPANY%></div>
</td>
<td bgcolor="#8C9A8C" width="3" height="21"></td>
</tr>
</table>
<table width="770" border="0" cellspacing="0" cellpadding="0" bgcolor="#8C9A8C" align="center">
<tr>
<td height="4"></td>
</tr>
</table>
<!--#include file="../../System/miscJScript.asp"-->
</BODY>
</HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -