📄 d_input.asp
字号:
<!-- #include File=../../showsort/showsort(man).asp -->
<%if sort<=2 then%>
<script language="JavaScript">
alert("对不起，您没有权限！！");
window.history.back();
</script>
<%end if%>
<%
set rs=server.createobject("ADODB.Recordset")
if request("pagename")="addnewdept" then
rs.Open "Select * from manage_dept where deptname='"&request("deptname")&"'",source,3,3
if not rs.eof then
%>
<script language="JavaScript">
alert("此部门名称已被使用，请重新选择");
window.history.back();
</script>
<%
response.end
end if
rs.addnew
rs("deptname")=request("deptname")
rs("state")=request("state")
rs("groupid")=0
rs("deptid")=0
rs("parent")=request("parent")
rs.update
rs.close
%>
<script language="JavaScript">
alert("添加成功");
window.location="d_input.asp";
</script>
<%
response.end
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>PMIS</title>
<LINK href="../../<%=session("color")%>.css" rel=stylesheet type=text/css>
<script language="JavaScript">
function amsub(form)
{
if(form.deptname.value=="")
{
alert("请输入部门名称!")
return false
}
if (form.state.value=="")
{ alert("请输入简要说明!")
return false
}
return true
}
</script>
</head>
<body topmargin="0" leftmargin="0">
<div align="center">
<center>
<!-- #include File=../../include/title2.asp -->
</center>
</div>
<div align="center">
<center>
<table width="100%" cellspacing cellpadding>
<tr>
<td width="20%" class="Titletd1" height="365" valign="top">
<table width="158" cellspacing cellpadding class="L2">
<tr>
<td height="10" colspan="3" class="bgcolor4"></td>
</tr>
<tr class="bgcolor4">
<td width="18%"></td>
<td width="82%" colspan="2"><font color="#FFFFFF">::::</font><font color="#FFFFFF">部门管理</font></td>
</tr>
<tr class="bgcolor2">
<td width="18%"></td>
<td width="16%"></td>
<td width="66%"><a href="../dept/d_list.asp"><font color="#FFFFFF">>
部门一览</font></a></td>
</tr>
<tr class="bgcolor2">
<td></td>
<td></td>
<td><a href="../dept/d_input.asp"><font color="#FFFFFF">> 新增部门</font></a></td>
</tr>
<tr class="bgcolor2">
<td></td>
<td></td>
<td><a href="../dept/d_del.asp"><font color="#FFFFFF">> 删除部门</font></a></td>
</tr>
<tr class="bgcolor2">
<td></td>
<td></td>
<td><a href="../dept/d_list4.asp"><font color="#FFFFFF">> 部门人员</font></a></td>
</tr>
<tr class="bgcolor4">
<td width="18%"></td>
<td width="82%" colspan="2"><font color="#FFFFFF">::::</font><font color="#FFFFFF">员工管理</font></td>
</tr>
<tr class="bgcolor2">
<td></td>
<td></td>
<td><a href="../man/m_modify.asp"><font color="#FFFFFF">> 员工一览</font></a></td>
</tr>
<tr class="bgcolor2">
<td></td>
<td></td>
<td><a href="../man/m_addnewuser.asp"><font color="#FFFFFF">>
新增员工</font></a></td>
</tr> <tr class="bgcolor2">
<td></td>
<td></td>
<td><a href="../man/m_del.asp"><font color="#FFFFFF">> 删除员工</font></a></td>
</tr>
<tr class="bgcolor2">
<td></td>
<td></td>
<td><a href="../man/m_leave.asp"><font color="#FFFFFF">> 离职员工</font></a></td>
</tr>
<tr class="bgcolor2">
<td></td>
<td></td>
<td><a href="../man/m_wagemonth.asp"><font color="#FFFFFF">>
工资报表</font></a></td>
</tr>
<tr class="bgcolor4">
<td width="18%"></td>
<td width="82%" colspan="2"><font color="#FFFFFF">::::日常人事管理</font></td>
</tr>
<tr class="bgcolor2">
<td></td>
<td></td>
<td><a href="d_list-tj.asp"><font color="#FFFFFF">> 添加申请</font></a></td>
</tr>
<tr class="bgcolor2">
<td></td>
<td></td>
<td><a href="d_list-sp.asp"><font color="#FFFFFF">> 人事审批</font></a></td>
</tr>
<tr class="bgcolor2"> <td></td> <td></td> <td><a href="d_list-pz.asp"><font color="#FFFFFF">> 人事配置</font></a></td> </tr> <tr class="bgcolor2"> <td></td> <td></td> <td><a href="d_list-lcsz.asp"><font color="#FFFFFF">> 人事流程设置</font></a></td> </tr>
<tr class="bgcolor4">
<td colspan="3" height="200"></td>
</tr>
</table>
</td>
<td width="1%" bgcolor="#FFFFFF"></td>
<td width="79%" bgcolor="#FFFFFF" valign="top">
<table width="100%" cellspacing cellpadding>
<tr>
<td width="100%" height="10"></td>
</tr>
<tr>
<td width="100%">
<table width="100%" cellspacing cellpadding>
<tr>
<td width="100%" height="25" style="background-image: url('../../images/<%=session("color")%>/hrm.gif'); background-repeat: no-repeat">
<font color="#000080"> 员工管理</font>
新增部门</td>
</tr>
<tr>
<td width="100%" height="10"></td>
</tr>
<tr>
<td width="100%" height="10">
<form method="post" action="d_input.asp" name="form1" onSubmit="return amsub(this)">
<table width="100%" border="0" cellspacing="0" cellpadding="0" class="L2">
<tr>
<td width="32%" class="unnamed2"> </td>
<td width="68%"> </td>
</tr>
<tr>
<td width="32%" class="unnamed2">
<div align="right">部门名称</div>
</td>
<td width="68%">
<input type="text" name="deptname" onFocus=this.select() onMouseOver=this.focus() maxlength="50">
</td>
</tr>
<tr>
<td width="32%" class="unnamed2"> </td>
<td width="68%"> </td>
</tr>
<tr>
<td width="32%" class="unnamed2" height="26">
<div align="right">简单说明</div>
</td>
<td width="68%" height="26">
<input type="text" name="state" onFocus=this.select() onMouseOver=this.focus() maxlength="50">
</td>
</tr>
<tr>
<td width="32%" class="unnamed2" height="14">
<div align="right">从属于</div>
</td>
<td width="68%" height="14">
<select name="parent">
<% set rs_dd=server.createobject("ADODB.Recordset")
rs_dd.Open "Select * from manage_dept ",source,3,3%>
<option value="0">不属于任何部门</option>
<%do while not rs_dd.eof %>
<option value="<%=rs_dd("id")%>"><%=rs_dd("deptname")%></option>
<%rs_dd.movenext
loop
rs_dd.close%>
</select>
</td>
</tr>
<tr>
<td width="32%" class="unnamed2"> </td>
<td width="68%"> </td>
</tr>
</table>
<table width="70%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td>
<div align="right">
<input type="hidden" name="pagename" value="addnewdept">
<input type="image" border="0" name="imageField2" src="../../images/i_button_6.gif" width="37" height="18">
</div>
</td>
</tr>
</table>
</form>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</center>
</div>
<div align="center">
<!-- #include File=../../include/last2.asp -->
</div>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -