标题:[求助] 关于ASP编写进销存的代码。
取消只看楼主
atian
Rank: 1
等 级:新手上路
帖 子:268
专家分:0
注 册:2006-1-24
结帖率:60%
 问题点数:0 回复次数:2 
[求助] 关于ASP编写进销存的代码。
[求助] 关于ASP编写进销存的代码。
我用ASP+ACCESS编写了一个简易的进销存系统。。

基本实现了添加,查询,修改,删除,统计及人员权限问题等功能。但是在表的关系上还没有处理好。

即:有三个表。一个是入库表暂且叫(A),一个是出库表(B),另一个是库存表(C)

当入库时,判断库存里有没有这个商品。如果有就将数量相加并更新库存表。即把入库记录存在入库表(A)中,然后更新库存表的数量(C)。

当出库时,就将数量相减。即把出库记录存在出库表(B)中,然后更新库存表的数量(C)。


但是有一个问题,就是当入库记录没有保存在入库表(A)中,时它也会更新库存表(C),出库时也一样。

如何实现如果没有将入(出)库表的记录保存到入库表(A)或出库表(B)中就不更新库存表(C)

多谢。
部分代码如下:这是入库时的代码。


conn.execute("INSERT INTO [A] (dt,zy,jxclx,mc,xh,gg,ys,sl,dw,dj,je,jsr,bz,ip) VALUES('"&dt&"','"&zy&"','"&jxclx&"','"&mc&"','"&xh&"','"&gg&"','"&ys&"','"&sl&"','"&dw&"','"&dj&"','"&je&"','"&jsr&"','"&bz&"','"&ip&"')")

sqlup="select * from [C]"
set rsup=server.createobject("adodb.recordset")
rsup.open sqlup,conn,2,3
if not rs.eof then
conn.execute("UPDATE [C] SET sl=sl+"&sl&" WHERE gg='"&gg&"' and mc='"&mc&"'" )
end if
rsup.close()
response.write"<div align=center><br><br><br><br>表单操作成功!</div>"
response.write"<meta http-equiv='refresh' content='2;URL=../.'>"
response.end






搜索更多相关主题的帖子: ASP 代码 编写 
2006-03-26 10:32
atian
Rank: 1
等 级:新手上路
帖 子:268
专家分:0
注 册:2006-1-24
得分:0 
不行,我要反映出每一笔的入库记录来。

认认真真的工作,开开心心的娱乐......
2006-03-26 12:44
atian
Rank: 1
等 级:新手上路
帖 子:268
专家分:0
注 册:2006-1-24
得分:0 
如何实现如果没有将入(出)库表的记录保存到入库表(A)或出库表(B)中就不更新库存表(C)

认认真真的工作,开开心心的娱乐......
2006-03-26 12:44



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-52846-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.405787 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved