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

📄 out.asp

📁 这是用数据库语言编写的仓库管理系统
💻 ASP
字号:
<%
'#################################################################
'#  兄弟资源网仓库管理 ver.2001
'#
'#  版权所有: 兄弟资源网
'#
'#  制作人  : 江湖兄弟            
'#           
'#  主页地址: http://soft.51dns.net/        兄弟资源网
'#            
'#################################################################
'#【版权声明】
'#
'# 本软体为共享软体(shareware)提供个人网站免费使用,请勿非法修改,
'# 转载,散播,或用于其他图利行为,并请勿删除版权声明。
'# 如果您的网站正式起用了这个脚本,请您通知我们,以便我们能够知晓!
'# 如果可能,请在您的网站做上我们的链接,希望能给予合作。谢谢!
'#################################################################
'# 请您尊重我们的劳动和版权,不要删除以上的版权声明部分,谢谢合作
'# 如有任何问题请到我们的论坛告诉我们                            
'#################################################################
%>
<%@ LANGUAGE="VBScript"%>
<% response.buffer=true %>
<%const title="出库操作"%>
<html>
<head>
<meta http-equiv="Content-Type"content="text/html; charset=gb_2312-80">
<meta name="GENERATOR" content="Microsoft FrontPage Express 2.0">

<title><%=title%></title>
<link rel=stylesheet type=text/css href=forum.css>
</head>
<body topmargin="0" onload=this.document.input.out_num.focus();>

<!--#include file=myPrg.asp-->
<!--#include file=opendb.inc-->
<%
CheckLogin
Showtitle(title)
getStorage(session("storage"))

if request("id")<>"" then
session("name_id")=request("id")
sql="select * from stock where name_id="&request("id")
rs.open sql,conn,3,2
if not rs.eof then
  session("name")=rs("name")
  session("now_stock")="<font color=red>"&rs("now_stock")&"</font> "&rs("unit")
  rs.close
  gettypepath
  response.write " -> [ <font color=red>"&session("name")&" </font> ]"

else
  showerror("没有找到记录!")
end if

%>
<form action="save_out.asp" method="POST" name="input">
<p align=center><font color=red>请在以下的表格中填入相关的数据</font>
<p>
<table align=center border=0>
 <tr>
   <td nowrap align=right><font color=blue>目前库存:</td>
   <td><%=session("now_stock")%></td>
 </tr>

 <tr>
   <td nowrap align=right><font color=blue>数量:</td>
   <td><input class=smallInput type=textbox name="out_num" value=''>**</td>
 </tr>
 <tr>
   <td valign="top"><font color=blue>出库摘要:</td>
   <td><textarea class=smallarea name=zy rows=3 cols=40>出</textarea>**</td>
 </tr>
 <tr>
   <td nowrap align=right><font color=blue>种类:</td>
   <td><input class=smallInput type=textbox name="zl" value=' '></td>
 </tr>
 <tr>
   <td nowrap align=right><font color=blue>号数:</td>
   <td><input class=smallInput type=textbox name="hs" value=' '></td>
 </tr>

 <tr>
   <td nowrap align=right><font color=blue>接应者:</td>
   <td>
  <%ShowUses%>**
     [ <a href=usesmanage.asp target=_blank>接应者管理</a> ]
    </td>

 </tr>

 <tr>
   <td>
   <td><br><input class=buttonface type=submit name=ok value=确定> 
           <input class=buttonface type=reset name=reset value=复原> 
           <input class=buttonface type=button name=retu value=返回 onclick=history.go(-1)>
 </tr>

</table>
</form>
<%
else
  session("name_id")=0
  showerror("非法侵入!")
end if
%>
<!--#include file=copyright.asp-->

</body>
</html>

⌨️ 快捷键说明

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