📄 checkxsth.asp

📁 企业进销存管理系统企业级别的进销存管理系统

💻 ASP

字号:

<%
thid=request("hthph")
spname=request("hspname")
jc=request("hjc")
cd=request("hcd")
gg=request("hgg")
bz=request("hbz")
dw=request("hdw")
dj=request("hdj")
je=request("hje")
khname=request("hkhname")
xsdate=request("hxsdate")
czy=request("hczy")
jsr=request("hjsr")
jsfs=request("hjsfs")
sl=request("hsl")
spid=request("hid")
wf=request("hwf")
sf=request("hsf")
yf=request("hyf")
kcsl=request("hkcsl")
if request("hwf")>0 then 
 whether="否"
else
 whether="是"
end if 
%>
<% if sl="0" or sf="0" then %>
<script language="JavaScript">
alert("请输入退货数量")
history.back(1)
</script>
<% end if%>
<%set conn=server.createobject("adodb.connection")
set rs=server.createobject("adodb.recordset")
conn.open application("dsn")
'加入销售退货表'
sql="insert into tab_sellth (id, spid, spname, jc, cd, gg, bz, dw, dj, sl, je, khname, thdate, czy, jsr, jsfs) values('"&thid&"','"&spid&"','"&spname&"','"&jc&"','"&cd&"','"&gg&"','"&bz&"','"&dw&"',"&dj&","&sl&","&je&",'"&khname&"','"&thdate&"','"&czy&"','"&jsr&"','"&jsfs&"')"
rs.open sql,conn,1,3
set rs=nothing
%>
<%set myrs=server.CreateObject("adodb.recordset")
'加入销售退货票号表'
sql="insert into tab_thph_xs(thph, sl,yf,sf,wf,khname, thdate, czy, jsr, jsfs, whether) values('"&thid&"','"&sl&"',"&yf&","&sf&","&wf&",'"&khname&"','"&thdate&"','"&czy&"','"&jsr&"','"&jsfs&"','"&whether&"')"
myrs.open sql,conn,1,3
set myrs=nothing
%>
<%'更新库存表'
set rec=server.CreateObject("adodb.recordset")
sql="update tab_kucun set kcsl=kcsl+"&sl&",kcje=(kcsl+"&sl&")*"&dj&" where id='"&spid&"'"
rec.open sql,conn,1,3
set rec=nothing
%>

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title></title>
<link href="../style.css" rel="stylesheet" type="text/css">
</head>

<body>
<div align="center">
  <p>&nbsp;</p>
  <p>&nbsp;</p>
  <p>&nbsp;</p>
  <p><font color="8080c0" size="2" face="幼圆"><strong>退货成功单击</strong></font><a href="spxs.asp" target="_self">返回</a><font color="8080c0" size="2" face="幼圆"><strong>继续退货</strong></font> 
  </p>
</div>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -