[求助] 关于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