📄 user_add.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file=DataBase/conn.asp-->
<!--#include file=config.asp-->
<!--#include file=purview.asp-->
<%
call users
if request("post")<>"" then
'检索用户名是否存在
set rsy=server.CreateObject("adodb.recordset")
sqly="select * from tb_User where username='"&request("username")&"'"
rsy.open sqly,conn,1,3
'如果用户名存在
if not rsy.eof then
response.Write("<script language=javascript>alert('该用户已经存在');location='javascript:history.go(-1)'</script>")
response.End()
else
'如果用户名不存在
set rs=server.CreateObject("adodb.recordset")
sql="select * from tb_User"
rs.open sql,conn,1,3
rs.addnew
rs("chaoji")=request("chaoji")
rs("username")=request("username")
rs("userpwd")=request("userpwd")
rs("Client")=request("client")
rs("Linkman")=request("Linkman")
rs("Pact")=request("Pact")
rs("Stockpile")=request("Stockpile")
rs("Product")=request("Product")
rs("Feedback")=request("Feedback")
rs("Forms")=request("Forms")
rs("Email")=request("Email")
rs("Addresser")=request("Addresser")
rs("users")=request("users")
rs.update
rs.close
response.Write("<script language=javascript>alert('用户添加成功')</script>")
end if
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
<style type="text/css">
<!--
body {
background-color: #DFEEFF;
}
body,td,th {
font-size: 12px;
}
-->
</style>
<link href="css/css.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
.style1 {font-weight: bold}
-->
</style>
</head>
<script language="javascript">
function checks()
{
if(form1.username.value=="")
{
alert("用户名不能为空");
return false;
}
else if(form1.userpwd.value=="")
{
alert("密码不能为空");
return false;
}
}
</script>
<body >
<form name="form1" method="post" action="">
<fieldset class="fiedset">
<legend>添加合同信息</legend>
<table width="970" border="0" align="center" cellspacing="0" bgcolor="#FFFFFF" class="table">
<tr align="center" bgcolor="#efefef">
<td height="25" colspan="4"><table width="77%" border="0">
<tr>
<td width="8%" align="right"><input name="chaoji" type="radio" value="不" checked></td>
<td width="18%">普通管理员</td>
<td width="4%" align="right"><input type="radio" name="chaoji" value="是"></td>
<td width="58%">超级管理员</td>
<td width="12%"><input name="Submit" type="submit" class="input" value=" 添 加 " onClick="return checks()"></td>
</tr>
</table></td>
</tr>
<tr>
<td width="21%" height="30" align="right">用户名：</td>
<td width="36%"><input name="username" type="text" class="in" id="LinkmanName2" size="30">
<input name="post" type="hidden" id="post2" value="true">
</td>
<td width="10%" align="right">密 码：
</td>
<td width="36%"><input name="userpwd" type="password" class="in" id="PactNumber" size="30"></td>
</tr>
<tr>
<td width="21%" height="30" align="right">权 限：</td>
<td colspan="3" rowspan="5" ><table width="85%" height="176" border="0" class="table">
<tr>
<td align="right"> 客户信息： </td>
<td><input name="Client" type="radio" value="只读" checked>
只读
<input type="radio" name="Client" value="可写">
可写</td>
<td align="right"> 联系人信息：</td>
<td><input name="Linkman" type="radio" value="只读" checked>
只读
<input type="radio" name="Linkman" value="可写">
可写</td>
</tr>
<tr>
<td align="right"> 合同信息：</td>
<td><input name="Pact" type="radio" value="只读" checked>
只读
<input type="radio" name="Pact" value="可写">
可写</td>
<td align="right"> 库存管理：</td>
<td><input name="Stockpile" type="radio" value="只读" checked>
只读
<input type="radio" name="Stockpile" value="可写">
可写</td>
</tr>
<tr>
<td align="right"> 产品管理：</td>
<td><input name="Product" type="radio" value="只读" checked>
只读
<input type="radio" name="Product" value="可写">
可写</td>
<td align="right">服务管理：</td>
<td><input name="Feedback" type="radio" value="只读" checked>
只读
<input type="radio" name="Feedback" value="可写">
可写</td>
</tr>
<tr>
<td align="right"> 报表管理：</td>
<td><input name="Forms" type="radio" value="只读" checked>
只读
<input type="radio" name="Forms" value="可写">
可写</td>
<td align="right"> Email管理：</td>
<td> <input name="Email" type="radio" value="只读" checked>
只读
<input type="radio" name="Email" value="可写">
可写</td>
</tr>
<tr>
<td align="right">发件人管理：</td>
<td><input name="Addresser" type="radio" value="只读" checked>
只读
<input type="radio" name="Addresser" value="可写">
可写</td>
<td align="right">用户管理：</td>
<td><input name="users" type="radio" value="只读" checked>
只读
<input type="radio" name="user" value="可写">
可写</td>
</tr>
</table>
</td>
</tr>
<tr>
<td height="30" align="right"> </td>
</tr>
<tr>
<td height="30" align="right"> </td>
</tr>
<tr>
<td height="30" align="right"> </td>
</tr>
<tr>
<td height="71" align="right"> </td>
</tr>
</table>
<table width="90%" height="5" border="0" align="center">
<tr>
<td></td>
</tr>
</table>
</fieldset>
</form>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -