📄 chukushenqingold.asp
字号:
<%'if session("ljl_grad")=2 then response.redirect "index.asp"%>
<!--#include file="bkconn.asp"-->
<html>
<head>
<meta http-equiv="Content-Language" content="en-us">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" type="text/css" href="normal.css">
<title><%=system%></title>
<script language="javascript">
function reg()
{
if(document.UserReg.a4.value.length<1)
{
alert("请填写领料用途!");
return ;
}
if(document.UserReg.a6.value.length<1)
{
alert("无效材料数量,领料要先从材料名称1中选择,并填写其领料数量!");
return ;
}
if(document.UserReg.a8.value.length<1)
{
alert("请填写领料人");
return ;
}
if(document.UserReg.lingliaodanwei.value.length<1)
{
alert("领料单位不能为空!");
return ;
}
if(document.UserReg.a9.value.length<1)
{
alert("备注信息不能为空,不填的请填写'无'!");
return ;
}
document.UserReg.submit();
}
</script>
</head>
<body>
<!--#include file="../top.asp"-->
<div align="center">
<center>
<table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#C0C0C0" width="92%" id="AutoNumber3" height="108">
<tr>
<td width="14%" height="108" valign="top"> <!--#include file="left.asp"--></td>
<td width="86%" height="108"><form method="POST" action="chukusave.asp" name="UserReg">
<div align="center">
<center>
<table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="568" id="AutoNumber1" height="303">
<tr>
<td width="566" height="23" bgcolor="#8AB6F6" colspan="4">
<p align="center"><font color="#FFFFFF"><span lang="zh-cn">出库受理子系统--</span>><span lang="zh-cn">领料申请</span></font></td>
</tr>
<tr>
<%set rs=server.createobject("adodb.recordset")
sql = "select * from 材料分类"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write "请先添加材料分类。"
response.end
else
%>
<td width="77" height="30" bgcolor="#F7FFEE"><span lang="zh-cn"> 材料名称1</span></td>
<td width="359" height="30"><span lang="zh-cn"> <select size="1" name="a1"><% do while not rs.eof%>
<option><%=trim(rs("材料名称"))%>|<%=trim(rs("材料型号"))%>|<%=trim(rs("材料单位"))%></option><%
rs.movenext
loop
'end if
'rs.close
rs.movefirst
%>
</select> </span></td>
<td width="51" height="30" bgcolor="#F7FFEE">
<p align="center"><span lang="zh-cn">数量</span></td>
<td width="69" height="30"><span lang="zh-cn"> <input type="text" name="a6" size="4"></span></td>
</tr>
<tr>
<td width="77" height="30" bgcolor="#F7FFEE"><span lang="zh-cn"> 材料名称2</span></td>
<td width="363" height="30"><span lang="zh-cn"> </span> <span lang="zh-cn">
<select size="1" name="cailiao2"><% do while not rs.eof%>
<option><%=trim(rs("材料名称"))%>|<%=trim(rs("材料型号"))%>|<%=trim(rs("材料单位"))%></option><%
rs.movenext
loop
'end if
'rs.close
rs.movefirst
%>
</select></span></td>
<td width="50" height="30" align="center" bgcolor="#F7FFEE"><span lang="zh-cn">数量</span></td>
<td width="67" height="30"><span lang="zh-cn"> <input type="text" name="shuliang2" size="4"></span></td>
</tr>
<tr>
<td width="77" height="31" bgcolor="#F7FFEE"><span lang="zh-cn">
材料名称3</span></td>
<td width="363" height="31"><span lang="zh-cn"> </span> <span lang="zh-cn">
<select size="1" name="cailiao3"><% do while not rs.eof%>
<option><%=trim(rs("材料名称"))%>|<%=trim(rs("材料型号"))%>|<%=trim(rs("材料单位"))%></option><%
rs.movenext
loop
'end if
'rs.close
rs.movefirst
%>
</select></span></td>
<td width="50" height="31" align="center" bgcolor="#F7FFEE"><span lang="zh-cn">数量</span></td>
<td width="67" height="31"><span lang="zh-cn"> <input type="text" name="shuliang3" size="4"></span></td>
</tr>
<tr>
<td width="77" height="31" bgcolor="#F7FFEE"><span lang="zh-cn">
材料名称4</span></td>
<td width="363" height="31"><span lang="zh-cn"> </span> <span lang="zh-cn">
<select size="1" name="cailiao4"><% do while not rs.eof%>
<option><%=trim(rs("材料名称"))%>|<%=trim(rs("材料型号"))%>|<%=trim(rs("材料单位"))%></option><%
rs.movenext
loop
'end if
'rs.close
rs.movefirst
%>
</select></span></td>
<td width="50" height="31" align="center" bgcolor="#F7FFEE"><span lang="zh-cn">数量</span></td>
<td width="67" height="31"><span lang="zh-cn"> <input type="text" name="shuliang4" size="4"></span></td>
</tr>
<tr>
<td width="77" height="31" bgcolor="#F7FFEE"><span lang="zh-cn">
材料名称5</span></td>
<td width="363" height="31"><span lang="zh-cn"> </span>
<span lang="zh-cn"><select size="1" name="cailiao5"><% do while not rs.eof%>
<option><%=trim(rs("材料名称"))%>|<%=trim(rs("材料型号"))%>|<%=trim(rs("材料单位"))%></option><%
rs.movenext
loop
end if
rs.close
%>
</select></span></td>
<td width="50" height="31" align="center" bgcolor="#F7FFEE"><span lang="zh-cn">数量</span></td>
<td width="67" height="31"><span lang="zh-cn"> <input type="text" name="shuliang5" size="4"></span></td>
</tr>
<tr>
<td width="77" height="31" bgcolor="#F7FFEE"><span lang="zh-cn">
领料用途</span></td>
<td width="480" height="31" colspan="3"><span lang="zh-cn"> <input type="text" name="a4" size="49"></span></td>
</tr>
<tr>
<td width="77" height="31" bgcolor="#F7FFEE"> <span lang="zh-cn">领 料
人</span></td>
<td width="364" height="31"> <span lang="zh-cn">
<input type="text" name="a8" size="23"></span></td>
<td width="50" height="31" bgcolor="#F7FFEE"><span lang="zh-cn">领料单位</span></td>
<td width="67" height="31"> <span lang="zh-cn">
<input type="text" name="lingliaodanwei" size="8"></span></td>
</tr>
<tr>
<td width="77" height="31" bgcolor="#F7FFEE"><span lang="zh-cn"> 备注信息</span></td>
<td width="480" height="31" colspan="3"><span lang="zh-cn"> <input type="text" name="a9" size="49" value="无"></span></td>
</tr>
<tr>
<td width="566" height="33" colspan="4">
<p align="center"><span lang="zh-cn">
<a title="保存本此录入的信息" href="javascript:reg()">提交申请</a> <a title="重新录入信息" href="javascript:document.UserReg.reset()">取 消</a> <font color="#FF0000"><a title="退出本模块" target="_top" href="jh.asp">退 出</a></font></span></td>
</tr>
</table>
</center>
</div>
</form>
</td>
</tr>
</table>
</center>
</div>
<div align="center">
<center>
<table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="92%" id="AutoNumber2" height="30">
<tr>
<td width="100%" height="30"><span lang="zh-cn"><font color="#FF0000">
材料领用流程:</font><font color="#AAAAAA">1领料人申请--</font></span><font color="#AAAAAA">><span lang="zh-cn">2供应会计稽核</span>--><span lang="zh-cn">3分管领导签字</span>--><span lang="zh-cn">4供应部门盖章</span>--><span lang="zh-cn">5仓库领料<br>
</span></font><span lang="zh-cn"><font color="#FF0000">提
示:</font><font color="#AAAAAA">材料名称显示的格式为:材料名称|材料型号|材料单位<br>
</font></span><font color="#AAAAAA"> </font>
<font color="#0000FF"><span lang="zh-cn">
先选择材料名称然后填写数量,不可以重复领一种材料,数量为空证明没领此材料。</span></font></td>
</tr>
</table>
</center>
</div>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -