⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 chukulistnew.asp

📁 网佳网络办公系统（以下简称OA）是一套基于B/S模式的无纸化办公系统。[显著特点：无须安装客户端] 主要功能模块：管理 公文 车辆 通知 档案 值班 人事 审批 仓库 主界面 软件下载 个
💻 ASP
字号:
🔍 
<%Response.Expires=0
Response.Buffer=true
Response.ExpiresAbsolute = Now() - 1
Response.AddHeader "Pragma","No-Cache"
Response.AddHeader "Cache-Control","Private"
Response.CacheControl = "No-Cache"
xian=session("xian")'获取权限
xian1=mid(xian,34,1)'稽核权
xian2=mid(xian,21,1)'审批权
xian3=mid(xian,44,1)'盖章
xian4=mid(xian,45,1)'领料
%>

<!--#include file="bkconn.asp"-->
<%
if request.querystring("id")="" then
response.write "没有正确的ID号"
else
NUMBER=clng(request.querystring("id"))
'重新提取数据
set RST=conn.execute("select  * from 出库 where id=" &NUMBER)
aa=rst("材料名称")
if rst("材料名称2")<>"空" then
ziduan2=rst("材料名称2")
mingcheng2=left(ziduan2,Instr(ziduan2,"|")-1) '获取材料名称
else
mingcheng2=rst("材料名称2")
end if
if rst("材料名称3")<>"空" then
ziduan3=rst("材料名称3")
mingcheng3=left(ziduan3,Instr(ziduan3,"|")-1) '获取材料名称
else
mingcheng3=rst("材料名称3")
end if
if rst("材料名称4")<>"空" then
ziduan4=rst("材料名称4")
mingcheng4=left(ziduan4,Instr(ziduan4,"|")-1) '获取材料名称
else
mingcheng4=rst("材料名称4")

end if
if rst("材料名称5")<>"空" then
ziduan5=rst("材料名称5")
mingcheng5=left(ziduan5,Instr(ziduan5,"|")-1) '获取材料名称
else
mingcheng5=rst("材料名称5")
end if
end if
%>

<HTML><HEAD><TITLE><%=rst("材料名称")%>的详细情况</TITLE>
<META content=zh-cn http-equiv=Content-Language>
<META content="text/html; charset=gb2312" http-equiv=Content-Type>
<META content="Microsoft FrontPage 5.0" name=GENERATOR>
<META content=FrontPage.Editor.Document name=ProgId>
<STYLE title=indexpage type=text/css>BODY {
	FONT-SIZE: 14px; LINE-HEIGHT: 18px
}
UL {
	FONT-SIZE: 14px; LINE-HEIGHT: 18px
}
OL {
	FONT-SIZE: 14px; LINE-HEIGHT: 18px
}
TD {
	FONT-SIZE: 9pt
}
A:link {
	COLOR: #000000; TEXT-DECORATION: none
}
A:visited {
	COLOR: #333333; TEXT-DECORATION: none
}
A:active {
	COLOR: #666666; TEXT-DECORATION: none
}
A:hover {
	COLOR: #ff6633; TEXT-DECORATION: underline
}
A {
	COLOR: #000000; FONT-SIZE: 9pt; TEXT-DECORATION: none
}
P {
	FONT-SIZE: 9pt; LINE-HEIGHT: 18px
}
.help {
	CURSOR: help
}
</STYLE>
</head>
<BODY leftMargin=0 topMargin=0>
<form method="POST" action="jihe.asp?id=<%=rst("id")%>&action=1">
  <p>　</p>
  <div align="center">
  <center>
  <table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="589" id="AutoNumber2" height="29">
    <tr>
      <td width="95" bgcolor="#DFDFFF" align="center" height="20">请领材料1</td>
      <td width="676" height="20">&nbsp;<font color="#FF0000"><span lang="en-us"><%=rst("材料名称")%></span>|<span lang="en-us"><%=rst("规格型号")%></span>|<span lang="en-us"><%=rst("单位")%></span></font>|请领数量：<font color="#FF0000"><%=rst("数量")%></font>|实领数量：<%if xian1=1 and rst("当前状态")="申请" then%><input type="text" name="d4" size="2" value="<%=rst("数量")%>"><%else%><font color="#FF0000"><%=rst("实领数量")%></font><%end if%>|单价<%if xian1=1 and rst("当前状态")="申请" then %><input type="text" name="danjia1" size="3"><%else%><font color="#FF0000"><%=rst("单价1")%></font><%end if%>元|出库     
<span lang="en-us"><% 
            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
	if xian1=1 and rst("当前状态")="申请" then
%><select size="1" name="D3"><% do while not rs.eof%>
      <option><%=trim(rs("仓库名称"))%></option><%
        rs.movenext
        loop
        rs.movefirst%>

      </select>
</span><%else%><font color="#FF0000"><%=rst("存放仓库")%></font><%end if%></td> 
    </tr>
    <%if mingcheng2<>"空" then '材料名称为空的直接不显示表格%>
    <tr>
      <td width="95" bgcolor="#DFDFFF" align="center" height="21">请领材料2</td>
      <td width="676" height="21"><span lang="en-us">&nbsp;</span><font color="#FF0000"><%=rst("材料名称2")%></font>|请领数量：<font color="#FF0000"><%=rst("数量2")%></font>|实领数量：<%if xian1=1 and rst("当前状态")="申请" then%><input type="text" name="shuliang2" size="3" value="<%=rst("数量2")%>"><%else%><font color="#FF0000"><%=rst("实领数量2")%></font><%end if%>|单价<%if xian1=1 and rst("当前状态")="申请" then %><input type="text" name="danjia2" size="3"><%else%><font color="#FF0000"><%=rst("单价2")%></font><%end if%>元|出库<%if xian1=1 and rst("当前状态")="申请" then%>
<span lang="en-us"><select size="1" name="cangku2"><% do while not rs.eof%>    
      <option><%=trim(rs("仓库名称"))%></option><%
        rs.movenext
        loop
        rs.movefirst%>

      </select>
</span><%else%><font color="#FF0000"><%=rst("仓库2")%></font><%end if%></td>
    </tr>
    <%end if%>
        <%if mingcheng3<>"空" then '材料名称为空的直接不显示表格%>
    <tr>
      <td width="95" bgcolor="#DFDFFF" align="center" height="22">请领材料3</td>
      <td width="676" height="22"><span lang="en-us">&nbsp;</span><font color="#FF0000"><%=rst("材料名称3")%></font>|请领数量：<font color="#FF0000"><%=rst("数量3")%></font>|实领数量：<%if xian1=1 and rst("当前状态")="申请" then%><input type="text" name="shuliang3" size="3" value="<%=rst("数量3")%>"><%else%><font color="#FF0000"><%=rst("实领数量3")%></font><%end if%>|单价<%if xian1=1 and rst("当前状态")="申请" then %><input type="text" name="danjia3" size="3"><%else%><font color="#FF0000"><%=rst("单价3")%></font><%end if%>元|出库<%if xian1=1 and rst("当前状态")="申请" then%><span lang="en-us"><select size="1" name="cangku3"><% do while not rs.eof%>
      <option><%=trim(rs("仓库名称"))%></option><%
        rs.movenext
        loop
        rs.movefirst%>

      </select>
</span><%else%><font color="#FF0000"><%=rst("仓库3")%></font><%end if%></td>
    </tr>
    <%end if
   if mingcheng4<>"空" then '材料名称为空的直接不显示表格%>

    <tr>
      <td width="95" bgcolor="#DFDFFF" align="center" height="22">请领材料4</td>
      <td width="676" height="22"><font color="#FF0000">&nbsp;<%=rst("材料名称4")%></font>|请领数量：<font color="#FF0000"><%=rst("数量4")%></font>|实领数量：<%if xian1=1 and rst("当前状态")="申请" then%><input type="text" name="shuliang4" size="3" value="<%=rst("数量4")%>"><%else%><font color="#FF0000"><%=rst("实领数量4")%></font><%end if%>|单价<%if xian1=1 and rst("当前状态")="申请" then %><input type="text" name="danjia4" size="3"><%else%><font color="#FF0000"><%=rst("单价4")%></font><%end if%>元|出库<%if xian1=1 and rst("当前状态")="申请" then%><span lang="en-us"><select size="1" name="cangku4"><% do while not rs.eof%>
      <option><%=trim(rs("仓库名称"))%></option><%
        rs.movenext
        loop
        rs.movefirst%>

      </select>
</span><%else%><font color="#FF0000"><%=rst("仓库4")%></font><%end if%></td>
    </tr>
        <%end if
   if mingcheng5<>"空" then '材料名称为空的直接不显示表格%>

    <tr>
      <td width="95" bgcolor="#DFDFFF" align="center" height="23">请领材料5</td>
      <td width="676" height="23"><font color="#FF0000">&nbsp;<%=rst("材料名称5")%></font>|请领数量：<font color="#FF0000"><%=rst("数量5")%></font>|实领数量：<%if xian1=1 and rst("当前状态")="申请" then%><input type="text" name="shuliang5" size="3" value="<%=rst("数量5")%>"><%else%><font color="#FF0000"><%=rst("实领数量5")%></font><%end if%>|单价<%if xian1=1 and rst("当前状态")="申请" then %><input type="text" name="danjia5" size="3"><%else%><font color="#FF0000"><%=rst("单价5")%></font><%end if%>元|出库<%if xian1=1 and rst("当前状态")="申请" then%><span lang="en-us"><select size="1" name="cangku5"><% do while not rs.eof%>
      <option><%=trim(rs("仓库名称"))%></option><%
        rs.movenext
        loop
                %>

      </select>
</span><%else%><font color="#FF0000"><%=rst("仓库5")%><%end if%></font><%end if%></td>
    </tr>
    <%end if%>
    <tr>
      <td width="95" bgcolor="#DFDFFF" align="center" height="25">领料用途</td>
      <td width="676" height="25"><span lang="en-us">&nbsp;<%=rst("领料用途")%></span></td>
    </tr>
    <tr>
      <td width="95" bgcolor="#DFDFFF" align="center" height="25">申请人员</td>
      <td width="676" height="25"><span lang="en-us">&nbsp;<%=rst("领料人")%></span></td>
    </tr>
    <tr>
      <td width="95" bgcolor="#DFDFFF" align="center" height="22">申请时间</td>
      <td width="676" height="22"><span lang="en-us">&nbsp;<%=rst("申请时间")%></span></td>
    </tr>
    <tr>
      <td width="95" bgcolor="#DFDFFF" align="center" height="20">备注信息</td>
      <td width="676" height="20"><span lang="en-us">&nbsp;<%=rst("备注")%></span></td>
    </tr>
    <tr>
      <td width="95" bgcolor="#DFDFFF" align="center" height="25"><%if rst("是否作废")=true then%>是否作废</td>
      <td width="672" height="25"><span lang="en-us">&nbsp;<font color="#FF0000">此工单已经作废！！</font></span><%else%>受理      
      <span lang="en-us">I</span> P</td>     
      <td width="175" height="25"><span lang="en-us">&nbsp;<%=rst("ip")%></span><%end if%></td>
    </tr>
    <tr>
      <td width="95" bgcolor="#DFDFFF" align="center" height="17"><%if rst("是否作废")=true then%>作废原因</td>
      <td width="672" height="17"><font color="#FF0000">&nbsp;</font><span lang="en-us"><%=rst("作废原因")%><%else%>当前状态</span></td>
      <td width="175" height="17"><font color="#FF0000">&nbsp;</font><span lang="en-us"><%=rst("当前状态")%> <%end if%><input type="hidden" name="yanzheng" size="20" value="<%=rst("当前状态")%>"></span></td>
    </tr>
    <tr>
      <td width="95" bgcolor="#DFDFFF" align="center" height="26">管理操作</td>
      <td width="676" height="26">
      <p align="center"><%if rst("是否作废")=false then%><a href="javascript:self.close()">关闭</a>&nbsp;&nbsp;&nbsp;<%if xian1=1 and rst("当前状态")="申请" then%>
      <a href="zuofei.asp?id=<%=rst("id")%>"><font color="#FF0000">作废</font></a>&nbsp;&nbsp;&nbsp;&nbsp;<input type="submit" value="稽  核" name="B1" style="border: 1px solid #000080; background-color: #FFFFFF"><%end if%> &nbsp;&nbsp;<%if xian2=1  and rst("当前状态")="稽核" then%>
      <a href="zuofei.asp?id=<%=rst("id")%>"><font color="#FF0000">作废</font></a>&nbsp;&nbsp;&nbsp;&nbsp;<a href="jihe.asp?id=<%=rst("id")%>&action=2">签批</a><%end if%>&nbsp;&nbsp;<%if xian3=1  and rst("当前状态")="签批" then%>
      <a href="zuofei.asp?id=<%=rst("id")%>"><font color="#FF0000">作废</font></a>&nbsp;&nbsp;&nbsp;&nbsp;<a href="jihe.asp?id=<%=rst("id")%>&action=3">盖章</a><%end if%>&nbsp;&nbsp;     
      <%if xian4=1  and rst("当前状态")="盖章" then%>
      <a href="zuofei.asp?id=<%=rst("id")%>"><font color="#FF0000">作废</font></a>&nbsp;&nbsp;&nbsp;&nbsp;<a href="jihe.asp?id=<%=rst("id")%>&action=4&shuliang=<%=rst("实领数量")%>&mingcheng=<%=rst("材料名称")%>&mingcheng2=<%=mingcheng2%>&mingcheng3=<%=mingcheng3%>&mingcheng4=<%=mingcheng4%>&mingcheng5=<%=mingcheng5%>&shuliang2=<%=rst("实领数量2")%>&shuliang3=<%=rst("实领数量3")%>&shuliang4=<%=rst("实领数量4")%>&shuliang5=<%=rst("实领数量5")%>">收单发料</a> <%end if%><%end if%></td>     
    </tr>
    <tr>
      <td width="771" bgcolor="#DFDFFF" align="center" height="1" colspan="2">
      定单流程：1、[<font color="#FF0000"><span lang="en-us"><%=rst("申请时间")%></span></font>][<font color="#FF0000"><span lang="en-us"><%=rst("领料人")%></span></font>]提出申请<span lang="en-us">--&gt;2</span>、[<font color="#FF0000"><span lang="en-us"><%=rst("稽核时间")%></span></font>][<font color="#FF0000"><span lang="en-us"><%=rst("稽核人")%></span></font>]稽核<span lang="en-us">--&gt;[</span><font color="#FF0000"><span lang="en-us"><%=rst("签批时间")%></span></font><span lang="en-us">][</span><font color="#FF0000"><span lang="en-us"><%=rst("签批人")%></span></font><span lang="en-us">]</span>签批<span lang="en-us">[</span><font color="#FF0000"><span lang="en-us"><%=rst("签批1时间")%></span></font><span lang="en-us">][</span><font color="#FF0000"><span lang="en-us"><%=rst("签批人1")%></span></font><span lang="en-us">]</span>签批--<span lang="en-us">&gt;</span>3、[<font color="#FF0000"><span lang="en-us"><%=rst("盖章时间")%></span></font>][<font color="#FF0000"><span lang="en-us"><%=rst("盖章人")%></span></font>]盖章<span lang="en-us">--&gt;4</span>、[<font color="#FF0000"><span lang="en-us"><%=rst("出库时间")%></span></font>][<font color="#FF0000"><span lang="en-us"><%=rst("发料人")%></span></font>]凭领料单发料完毕！</td>
      </tr>
  </table>
  </center>
</div>
</form>

</BODY></HTML>
<%  
conn.close
set conn=nothing  
%>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -