stock_product_numchange.asp

来自「Activity——活动管理模块 Analyse——分析模块 Client—」· ASP 代码 · 共 85 行

ASP

85 行

<!--#include file="../conn.asp"-->
<html>
<head>
<meta name="版权" content="">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>物品数量更改</title>
<link rel="STYLESHEET" href="../css.css" type="text/css">
<style type="text/css">
<!--
.style1 {
	color: #FF0000;
	font-weight: bold;
}
-->
</style>
</head>
<body topmargin="0" marginheight="0" leftmargin="0" marginwidth="0" bgcolor="#ffffff">
<center>
<!--#include file="../scripts/check.vs"-->
<!--保存前的完整性检查和提交函数-->
<script language="VBScript">
sub check()
	if trim(frmMain.num_changed.value) = "" or trim(frmMain.num_changed.value) = "0" then
		msgbox "请输入商品数量！！"
		exit sub
	end if
		frmMain.act.value = "change"
		frmMain.submit()	
end sub
</script>
<% 
''判断页面的操作是否为保存更改
	if request("act") = "change" then
		sql = "select * from stock_temp where CreatorID = " & session("Session_User") & " and CreateDate = convert(char(10),getdate(),120)  and ProductID=" &trim(request("id"))
		set rec = server.createobject("adodb.recordset")	
		rec.open sql,conn,2,2
		while not rec.eof
			rec("ProductNum")=cint(request("num_changed"))
			rec.update			
		   rec.movenext
		wend	
	'response.Write(sql)
		set rec=nothing
''提示保存修改成功	，并且父页面刷新，该页面自动关闭
	%>
	<script language="VBScript">
    	msgbox "数量修改成功！！"
		opener.childfm.action = "stock.asp"
		opener.childfm.submit()
		window.close()
	</script>
	<%
	end if
''如果该页面操作不是保存修改，则显示修改窗口
%>

<table  border=0 cellPadding=0 cellSpacing=1 width="220">
<tr><td align=center><br>
<form method="POST" name="frmMain">
	<input type="Hidden" name="resID" value=<%=request("resID")%>>
	<input type="Hidden" name="act">
<table  border=0 cellPadding=0 cellSpacing=1 width="200">
<tr class="CListTTL"><td height="20" colspan="2">库存物品数量更改</td>
</tr>
<tr  class=CRow><td width="174"  height="30" align="center" >原始数量: <%=request("num")%></td>
<td width="173"  height="30" align="center"><input  onBlur=Num_onBlur("num_changed")  type="text" class=CInput name="num_changed"  size = 6 maxlength="4"></td
></tr>

<tr  class=CRow>
<td height="20" align="center" colspan="2">
<br>
<input name="SaveButton" type="button" class="button_all"  value="保存" onclick="check()">
<input name="CancelButton" type="button" class="button_all"  value="取消" onclick="window.close()">

<br>
</td>
</tr>
</table>
</form>
</td><tr>
</table>
</center>
</body>
</html>

stock_product_numchange.asp - 源码说明

本页面展示了「Activity——活动管理模块 Analyse——分析模块 Client——客户管理系统模块 Email——E-mail管理模块 Fee——费用管理模块 Report——报表模块 Sel」中的 stock_product_numchange.asp 源码文件，采用 ASP 编程语言编写，共 85 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与模块相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C

搜索代码Ctrl + F

全屏模式F11

增大字号Ctrl + =

减小字号Ctrl + -

显示快捷键?