📄 spxsjzok.asp
字号:
<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="../../Connections/sell.asp" -->
<%
if(Request("hjkph") <> "") then varid = Request("hjkph")
if(Request("hxsph") <> "") then varxsph = Request("hxsph")
if(Request("hkhname") <> "") then varkhname = Request("hkhname")
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("hxsph") <> "") then varxsph = Request("hxsph")
Ins_jz ="INSERT INTO dbo.tab_selljz (ID, xsid,khname,bcjk,ye,jkdate,czy ,jsr) VALUES('" +_
Replace(varid, "'", "''") + "', '" + Replace(varxsph, "'", "''") + "', '" +_
Replace(varkhname, "'", "''") + "', " + Replace(varbcjk, "'", "''") + ", " +_
Replace(varye, "'", "''") + ", '" + Replace(varjkdate, "'", "''") + "', '" +_
Replace(varczy, "'", "''") + "', '" + Replace(varjsr, "'", "''") + "') "
conn.Execute(Ins_jz)
'更新销售票号数据表
UP_sellph= "UPDATE dbo.tab_sellph SET ss = ss + " + Replace(varbcjk, "'", "''") +_
" , ws = " + Replace(varye, "'", "''")+" ,whether = '"+Replace(varwhether, "'", "''") +_
"' WHERE xsph ='" + Replace(varxsph, "'", "''") + "' "
conn.Execute(UP_sellph)
%>
<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="./spxsjz.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 + -