⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 rkjzok.asp

📁 企业进销存管理系统 企业级别的进销存管理系统
💻 ASP
字号:
<%
jkph=request("hjkph")
jkdate=request("hjkdate")
bcjk=request("hbcjk")
ye=request("hye")
rkph=request("hrkph")
gysname=request("hgysname")
czy=request("hjkczy")
jsr=request("hjkjsr")
if ye="0" then 
whether="是"
else 
whether="否"
end if
%>
<%
set conn=server.CreateObject("adodb.connection")
conn.open application("dsn")
%>
<%'加入入库结账票号表'
set rs=server.CreateObject("adodb.recordset")
sql="insert into tab_rkjz(rkid, gysname, bcjk, ye, jkdate,czy ,jsr) values('"&rkph&"','"&gysname&"',"&bcjk&","&ye&",'"&jkdate&"','"&czy&"','"&jsr&"')"
rs.open sql,conn,1,3
%>
<%'更新入库票号表'
set myrs=server.createobject("adodb.recordset")
sql="update tab_rkjz_main set wf="&ye&",whether='"&whether&"' where id='"&rkph&"'"
myrs.open sql,conn,1,3
%>
<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><font color="336699">商品入库结账成功单击<a href="rkjz.asp" target="_parent">[返回]</a> 继续结账 </font> 
  </p>
</div>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -