adduser.asp
来自「Activity——活动管理模块 Analyse——分析模块 Client—」· ASP 代码 · 共 131 行
ASP
131 行
<!--#include file="../conn.asp"-->
<%
set rs=conn.execute("select * from Section") '从数据库中读取部门信息
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD><TITLE>添加用户</TITLE>
<SCRIPT language=JavaScript>
function CheckForm()
{
if (document.UserAdd.UserName.value.length == 0) { //通过表单名UserAdd引用UserName的数据
alert("请输入用户名."); //如果长度为0，则警告
document.UserAdd.UserName.focus(); //是光标回到填写错误的表单元素
return false;
}
if (document.UserAdd.UserName.value.indexOf("<")!=-1 || document.UserAdd.UserName.value.indexOf(">")!=-1){
//检查用户名里是否有"<>"号
alert("用户名中不能包含 (<,>) ");
document.UserAdd.UserName.focus();
return false;
}
if (document.UserAdd.UserName.value.indexOf("'")!=-1){ //检查用户名里是否有"'"号
alert("用户名中不能包含 (') ");
document.UserAdd.UserName.focus();
return false;
}
if (document.UserAdd.UserPass.value.length == 0) { //检测用户密码长度是否为0
alert("请输入用户密码.");
document.UserAdd.UserPass.focus();
return false;
}
if (document.UserAdd.UserPass.value.indexOf("<")!=-1 || document.UserAdd.UserPass.value.indexOf(">")!=-1){
//检查用户密码里是否含有"<>"
alert("用户密码中不能包含 (<,>) ");
document.UserAdd.UserPass.focus();
return false;
}
if (document.UserAdd.UserPass.value.indexOf("'")!=-1){
//检查用户密码中是否含有"'"
alert("用户密码中不能包含 (') ");
document.UserAdd.UserPass.focus();
return false;
}
return true; //表单填写正确
}
</SCRIPT>
<META http-equiv=Content-Type content="text/html; charset=gb2312"><LINK
href="../css.css" type=text/css rel=stylesheet>
<META content="MSHTML 6.00.2600.0" name=GENERATOR></HEAD>
<BODY bgColor=#ffffff leftMargin=0 topMargin=0>
<FORM name=UserAdd onsubmit="return CheckForm();" action=AddUserDone.asp
method=post>
<TABLE cellSpacing=0 cellPadding=0 width="95%" align=center bgColor=#ffffff
border=0>
<TBODY>
<TR>
<TD>
<TABLE cellSpacing=1 cellPadding=6 width="100%" bgColor=#BFD3EE
border=0><TBODY>
<TR>
<TD vAlign=center align=middle
bgColor=#BFD3EE><div align="center">求是CRM</div></TD>
</TR>
<TR>
<TD vAlign=center bgColor=#ffffff>
<DIV align=left></DIV>
<TABLE cellSpacing=0 cellPadding=5 align=center bgColor=#BFD3EE
border=0>
<!--DWLayoutTable-->
<TBODY>
<TR bgColor=#ffffff>
<TD width="270" height="22"> <P> </P></TD>
</TR>
<TR bgColor=#BFD3EE>
<TD height="22"><B>操作:添加用户</B></TD>
</TR>
<TR align="center" bgColor=#ffffff>
<TD height="35" align="left" valign="middle"
style="BORDER-RIGHT: #BFD3EE 1px solid; BORDER-LEFT: #BFD3EE 1px solid"> 请输入用户名 :
<INPUT class=wordblue
style="BORDER-LEFT-COLOR: #ffffff; COLOR: #ff0000; BORDER-TOP-STYLE: solid; BORDER-TOP-COLOR: #ffffff; BORDER-BOTTOM: #BFD3EE 1px solid; BORDER-RIGHT-STYLE: solid; BORDER-LEFT-STYLE: solid; BACKGROUND-COLOR: #ffffff; BORDER-RIGHT-COLOR: #ffffff"
name=UserName> </TD>
</TR>
<TR align="center" bgColor=#ffffff>
<TD height="35" align="left" valign="middle" style="BORDER-RIGHT: #BFD3EE 1px solid; BORDER-LEFT: #BFD3EE 1px solid">请输入用户密码:
<INPUT class=wordblue
style="BORDER-LEFT-COLOR: #ffffff; COLOR: #ff0000; BORDER-TOP-STYLE: solid; BORDER-TOP-COLOR: #ffffff; BORDER-BOTTOM: #BFD3EE 1px solid; BORDER-RIGHT-STYLE: solid; BORDER-LEFT-STYLE: solid; BACKGROUND-COLOR: #ffffff; BORDER-RIGHT-COLOR: #ffffff"
name=UserPass></TD>
</TR>
<TR align="center" bgColor=#ffffff>
<TD height="36" align="left" valign="middle" style="BORDER-RIGHT: #BFD3EE 1px solid; BORDER-LEFT: #BFD3EE 1px solid">请选择用户部门:
<select name="S_Section">
<%
while not(rs.bof or rs.eof) '遍历所有数据
%>
<option value = "<%=rs("SectionID")%>"><%=rs("SectionName") %></option>
<%
rs.movenext '数据指针移动
wend
%>
</select></TD>
</TR>
<TR align="center" bgColor=#ffffff>
<TD height="35" align="left" valign="middle" style="BORDER-RIGHT: #BFD3EE 1px solid; BORDER-LEFT: #BFD3EE 1px solid">是否管理员: 否
<input type="radio" name="IsAdmin" value="0" checked>
是
<input type="radio" name="IsAdmin" value="1"> </TD>
</TR>
<TR align="center" bgColor=#ffffff>
<TD height="34" valign="center"
style="BORDER-RIGHT: #BFD3EE 1px solid; BORDER-LEFT: #BFD3EE 1px solid">
<INPUT style="BORDER-RIGHT: #BFD3EE 2px solid; BORDER-TOP: #BFD3EE 2px solid; FONT-SIZE: 9pt; BACKGROUND: #f0f0f0; BORDER-LEFT: #BFD3EE 2px solid; WIDTH: 120px; BORDER-BOTTOM: #BFD3EE 2px solid; HEIGHT: 20px" type=submit value=添加 name=submit> </TD>
</TR>
<TR bgColor=#ffffff>
<TD height="30" align="center" valign="top" bgColor=#BFD3EE><input onClick="javascript:location.href='UserManage.asp'" name="backbuton" type="button" class="button_all" id="backbuton" value="返回"></TD>
</TR>
</TBODY>
</TABLE></TD></TR>
<TR>
<TD vAlign=center bgColor=#BFD3EE>
<DIV align=center>求是CRM 版权所有</DIV></TD></TR>
<TR>
<TD></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></FORM>
<P>
<P></P></BODY></HTML>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?