📄 rkthjzok.asp
字号:
<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="../../Connections/sell.asp" -->
<%
if(Request("hjkph") <> "") then varid = Request("hjkph")
if(Request("hthph") <> "") then varthph = Request("hthph")
if(Request("hgysname") <> "") then vargysname = Request("hgysname")
if(Request("bcjk") <> "") then varbcjk = Request("bcjk")
if(Request("jkdate") <> "") then varjkdate = Request("jkdate")
if(Request("jkczy") <> "") then varczy = Request("jkczy")
if(Request("jkjsr") <> "") then varjsr = Request("jkjsr")
if(Request("hye") <> "") then varye = Request("hye")
if(Request("bcjk") <> "") then varbcjk = Request("bcjk")
if(Request("hye") <> "") then varye = Request("hye")
if(varye = 0) then
varwhether = "是"
else
varwhether = "否"
end if
if(Request("hthph") <> "") then varthph = Request("hthph")
'保存入库退货结账信息
Ins_rkth = "INSERT INTO dbo.tab_thjz_rk (ID,thid,gysname,bcjk,ye,jkdate,czy,jsr) VALUES ('" +_
Replace(varid, "'", "''") + "', '" + Replace(varthph, "'", "''") + "', '" +_
Replace(vargysname, "'", "''") + "', " + Replace(varbcjk, "'", "''") + ", " +_
Replace(varye, "'", "''") + ", '" + Replace(varjkdate, "'", "''") + "', '" +_
Replace(varczy, "'", "''") + "', '" + Replace(varjsr, "'", "''") + "') "
conn.Execute(Ins_rkth)
'更新入库退货票号数据表信息
UP_rkth = "UPDATE dbo.tab_thph_rk SET ss = ss + " + Replace(varbcjk, "'", "''") +_
" , ws = " + Replace(varye, "'", "''") + " , whether = '" + Replace(varwhether, "'", "''")+_
"' WHERE thph ='" + Replace(varthph, "'", "''") + "' "
conn.Execute(UP_rkth)
%>
<html>
<head>
<title>明日企业网上销售管理系统——应收管理！</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../style.css" rel="stylesheet">
</head>
<body bgcolor="#FFFFFF" text="#000000" background="../../images/bg.gif">
<table width="590" border="0" cellspacing="-2" cellpadding="-2" height="311">
<tr>
<td>
<div align="center">
<p><b><font color="990000">商品入库退货结款成功！</font></b></p>
<p><font color="#990000"><b>单击“ <a href="./rkthjz.asp" class="l" target="_parent">返回</a>
”继续结款。</b></font></p>
</div>
</td>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -