📄 outsave.asp
字号:
<!--#include file = "Startup.asp"-->
<!-- #include file="Function.asp" -->
<%
id=replace(trim(request("id")),"'","")
wzname=request("wzname")
ckname=request("ckname")
out=request("out")
shuliang=request("shuliang")
jieshouren=request("jieshouren")
beizhu=request("beizhu")
sql2="update ckinfo set 数量=数量-"&shuliang&" where id="&id
oConn.execute(sql2)
set rs=server.CreateObject("adodb.recordset")
sql="select * from out"
rs.open sql,oConn,1,2
rs.addnew
rs("物资名称")=wzname
rs("仓库名称")=ckname
rs("出库去向")=out
rs("出库数量")=shuliang
rs("接收人")=jieshouren
rs("备注")=beizhu
rs.update
rs.close
response.write "<script>"
response.write "alert('出库完成!');"&chr(13)
response.write "window.close();"
response.write "</script>"
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -