📄 o_addname.asp
字号:
<!--#include file="../../showsort/showsort(bangong).asp"-->
<%
if request("pagename")="doadddept" then
if request("allamount")="" or request("allamount")=0 then
%>
<script language="javascript">
alert("操作有误，请重填!");
window.location="o_adddept.asp";
</script>
<%
response.end
end if
set rs=server.createobject("ADODB.Recordset")
set rsd=server.createobject("ADODB.Recordset")
set rsu=server.createobject("ADODB.Recordset")
set rsa=server.createobject("ADODB.Recordset")
rsa.open "select * from office_deptpath where deptid='"&session("deptcode")&"'",source,3,3
if rsa.eof or rsa.bof then
%>
<script language="javascript">
alert("你部门还没有相关流程，请找管理员!");
window.location="o_adddept.asp";
</script>
<%
response.end
else
manager=rsa("manager")
doname=rsa("doname")
okname=rsa("okname")
end if
rsa.close
'-------------加入部门申请主表
rs.open "select * from office_deptmain order by id desc",source,3,3
if not rs.eof then
lastid=rs("id")+1
else
lastid=1
end if
rs.addnew
rs("brief")=request("brief")
rs("deptid")=trim(session("deptcode"))
rs("doman")=session("name")
rs("state")=1
rs("register")=now
rs("dodate")=request("yy")&"."&request("mm")
rs.update
rs.close
'--------------加入部门申请流程辅表
rsa.open "office_deptdo",source,3,3
rsa.addnew
rsa("main_id")=lastid
rsa("okname")=manager
rsa("state")=1
rsa("pass")=0
rsa.update
rsa.addnew
rsa("main_id")=lastid
rsa("okname")=doname
rsa("state")=2
rsa("pass")=0
rsa.update
rsa.addnew
rsa("main_id")=lastid
rsa("okname")=okname
rsa("state")=3
rsa("pass")=0
rsa.update
rsa.close
'--------------加入部门申请明细表
rsu.open "office_setup",source,3,3
while not rsu.eof
if request(rsu("id"))<>"" then
rsd.open "office_deptlist",source,3,3
rsd.addnew
rsd("main_id")=lastid
rsd("setup_id")=rsu("id")
rsd("s_quantity")=request(rsu("id"))
rsd("price")=rsu("price")
rsd.update
rsd.close
end if
rsu.movenext
wend
rsu.close
%>
<script language="javascript">
alert("已成功提交该申请!");
window.location="o_deptwait.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 je_onchange(a,b,c)
{
a.value=b*c;
document.form1.allamount.value=parseFloat(document.form1.allamount.value)+b*c;
}
function amsub(form)
{
if(form.allamount.value=="0"||form.allamount.value=="")
{
alert("操作有误,请重填!");
return false;
}
return true;
}
</script>
</head>
<body topmargin="0" leftmargin="0">
<div align="center">
<!-- #include File=../../include/title2.asp -->
<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> <a href="#"><font color="#FFFFFF">办公用品</font></a></td>
</tr>
<tr class="bgcolor2">
<td width="18%"></td>
<td width="16%"></td>
<td width="66%"><a href="../office/o_index.asp"><font color="#FFFFFF">>
办公用品列表</font></a></td>
</tr>
<tr class="bgcolor2">
<td></td>
<td></td>
<td><a href="../office/o_pathlist.asp"><font color="#FFFFFF">>
申请流程设定</font></a></td>
</tr>
<tr class="bgcolor2">
<td></td>
<td></td>
<td><a href="../office/o_deptwait.asp"><font color="#FFFFFF">>
待批办公用品</font></a></td>
</tr> <tr class="bgcolor2"> <td></td> <td></td> <td><a href="../office/o_deptlist.asp"><font color="#FFFFFF">> 部门办公用品</font></a></td> </tr> <tr class="bgcolor4"> <td width="18%"></td> <td width="82%" colspan="2"><font color="#FFFFFF">::::</font> <a href="#"><font color="#FFFFFF">文档管理</font></a></td> </tr>
<tr class="bgcolor2">
<td width="18%"></td>
<td width="16%"></td>
<td width="66%"><a href="../file/f_index.asp"><font color="#FFFFFF">>
查看文档</font></a><a href="allforums.asp?action=all"></a><a href="../schedule/s_menu_wait.asp"></a></td>
</tr>
<tr class="bgcolor2">
<td></td>
<td></td>
<td><a href="../file/f_adddept.asp"><font color="#FFFFFF">> 新建文档</font></a></td>
</tr>
<tr class="bgcolor2">
<td></td>
<td></td>
<td align="left"><a href="../file/f_setsort.asp"><font color="#FFFFFF">>
设置文档</font></a><font color="#FFFFFF"></font></td>
</tr>
<tr class="bgcolor2">
<td></td>
<td></td>
<td><a href="../file/f_search.asp"><font color="#FFFFFF">> 检索文档</font></a></td>
</tr>
<tr class="bgcolor4">
<td width="18%"></td>
<td width="82%" colspan="2"><font color="#FFFFFF">::::</font> <a href="#"><font color="#FFFFFF">图书管理</font></a></td>
</tr>
<tr class="bgcolor2">
<td width="18%"></td>
<td width="16%"></td>
<td width="66%"><a href="../book/b_index.asp"><font color="#FFFFFF">>
查看图书</font></a></td>
</tr>
<tr class="bgcolor2">
<td></td>
<td></td>
<td><a href="../book/b_add1.asp"><font color="#FFFFFF">> 添加图书</font></a></td>
</tr>
<tr class="bgcolor2">
<td></td>
<td></td>
<td align="left"><a href="../book/b_doapply1.asp"><font color="#FFFFFF">>
管理图书</font></a><a href="findplacard.asp"></a></td>
</tr>
<tr class="bgcolor4">
<td width="18%"></td>
<td width="82%" colspan="2"><font color="#FFFFFF">::::</font> <a href="#"><font color="#FFFFFF">车辆管理</font></a></td>
</tr>
<tr class="bgcolor2">
<td width="18%"></td>
<td width="16%"></td>
<td width="66%"><a href="../car/c_list.asp"><font color="#FFFFFF">>
查看车辆</font></a></td>
</tr>
<tr class="bgcolor2">
<td></td>
<td></td>
<td><a href="../car/c_add.asp"><font color="#FFFFFF">> 添加车辆</font></a></td>
</tr>
<tr class="bgcolor2">
<td></td>
<td></td>
<td align="left"><a href="../car/c_manage.asp"><font color="#FFFFFF">>
管理车辆</font></a></td>
</tr>
<tr class="bgcolor4">
<td width="18%"></td>
<td width="82%" colspan="2"><font color="#FFFFFF">::::</font> <a href="#"><font color="#FFFFFF">会议室管理</font></a></td>
</tr>
<tr class="bgcolor2">
<td width="18%"></td>
<td width="16%"></td>
<td width="66%"><a href="../meeting/m_list.asp"><font color="#FFFFFF">>
查看会议室</font></a></td>
</tr>
<tr class="bgcolor2">
<td></td>
<td></td>
<td><a href="../meeting/m_add.asp"><font color="#FFFFFF">> 添加会议室</font></a></td>
</tr>
<tr class="bgcolor2">
<td></td>
<td></td>
<td align="left"><a href="../meeting/m_manage.asp"><font color="#FFFFFF">>
管理会议室</font></a></td>
</tr>
<tr class="bgcolor4">
<td colspan="3" height="80"></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")%>/resource.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 name="form1" action="o_adddept.asp" onsubmit="return amsub(this)">
<table border="1" cellspacing="0" cellpadding="0" bordercolorlight="#CCCCCC" bordercolordark="#ffffff" width="98%" align="center">
<tr>
<td colspan="2" align="center"> <%=session("deptname")%>
文具用品申请表</td>
<td colspan="2" align="center">申请人:<%=session("name")%></td>
<td align="center" colspan="2"><%=formatdatetime(now,vbshortdate)%></td>
</tr>
<tr>
<td width="30%" align="center"> 名称及规划</td>
<td width="10%" align="center"> 单位</td>
<td width="10%" align="center"> 参考单价</td>
<td width="10%" align="center"> 剩余数量 </td>
<td width="10%" align="center"> 申请数量 </td>
<td width="10%"> 申请金额 </td>
</tr>
<%
set rs=server.createobject("ADODB.Recordset")
rs.Open "select a.id,a.name,a.unit,a.price,b.quantity from office_setup as a,office_deptsome as b where a.id=b.setup_id and b.deptid="&session("deptid"),source,3,3
while not rs.eof
%>
<tr>
<td width="30%" align="center" ><%=rs("name")%></td>
<td align="center" width="10%"><%=rs("unit")%></td>
<td align="center" width="10%"><%=rs("price")%>
<input type="hidden" name="price<%=rs("id")%>" size="5" maxlength="5" value="<%=rs("price")%>">
</td>
<td width="10%" align="center"> <%=rs("quantity")%>
</td>
<td align="center" width="10%">
<input type="text" name="<%=rs("id")%>" size="5" maxlength="5" onchange="return je_onchange(document.form1.amount<%=rs("id")%>,document.form1.price<%=rs("id")%>.value,this.value)">
</td>
<td align="center" width="10%">
<input type="text" name="amount<%=rs("id")%>" size="5" maxlength="10">
</td>
</tr>
<%
rs.movenext
wend
rs.close
%>
<tr>
<td colspan="5" align="right"> 总金额：</td>
<td width="10%">
<div align="center">
<input type="text" name="allamount" size="5" maxlength="10" value="0">
</div>
</td>
</tr>
<tr align="center">
<td colspan="6"> 备注 <br>
<textarea name="brief" cols="50" rows="5"></textarea>
</td>
</tr>
<tr align="center">
<td colspan="6">
<input type="hidden" name="pagename" size="5" maxlength="5" value="doadddept">
<input type="submit" name="Submit" value="确定申请">
<input type="reset" name="redo" value="重填">
</td>
</tr>
</table>
</form>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
<!-- #include File=../../include/last2.asp -->
</div>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -