Foxtable(狐表) → 用户栏目 → 专家坐堂 → 外部数据表的流水账问题


  共有15601人关注过本帖树形打印复制链接

主题：外部数据表的流水账问题
帅哥哟，离线，有人找我吗？
mr725
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级：MVP荣誉狐 帖子：5154 积分：31434 威望：0 精华：8 注册：2008/9/8 12:27:00 		  发帖心情 Post By：2010/8/15 21:27:00 [显示全部帖子]

你在命令窗口试一试这个:

 

Dim cmd As New SQLCommand
cmd.C
Dim amt,amtc AS Double

cmd.CommandText = "SELECT SUM(入库数量) FROM {物品入库} WHERE 物品名称 = '" & Tables("物品入库").current("物品名称") & "'"
amt = cmd.ExecuteScalar()
output.show("入库数量合计: " & amt)
cmd.CommandText = "SELECT SUM(出库数量) FROM {物品出库} WHERE [物品名称]= '" & Tables("物品入库").current("物品名称") & "'"
amtc = cmd.ExecuteScalar()
output.show("出库数量合计: " & amtc)
 回到顶部
帅哥哟，离线，有人找我吗？
mr725
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级：MVP荣誉狐 帖子：5154 积分：31434 威望：0 精华：8 注册：2008/9/8 12:27:00 		  发帖心情 Post By：2010/8/15 21:50:00 [显示全部帖子]

cmd.C  后面漏掉了   请补上去

 

我测试正常.

 
 回到顶部
帅哥哟，离线，有人找我吗？
mr725
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级：MVP荣誉狐 帖子：5154 积分：31434 威望：0 精华：8 注册：2008/9/8 12:27:00 		  发帖心情 Post By：2010/8/15 22:02:00 [显示全部帖子]

我的代码试告诉你数据源中"物品入库" 表和 "物品出库" 表中,当前行该物品名称的累计入库和出库的总计是多少. 当前行没有物品名称的话当然就出错了,可以加个判断条件,If Tables("物品入库").current.IsNull("物品名称") = False ...End If  

你现在要增加入库和出库, 怎样计算现在的库存余数应该没有问题了吧............
 回到顶部
帅哥哟，离线，有人找我吗？
mr725
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级：MVP荣誉狐 帖子：5154 积分：31434 威望：0 精华：8 注册：2008/9/8 12:27:00 		  发帖心情 Post By：2010/8/15 22:49:00 [显示全部帖子]

没有规定入库和出库都在一张表上才算流水账吧。 再说合并两张表再简单不过了。。。 呵呵

 回到顶部
帅哥哟，离线，有人找我吗？
mr725
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级：MVP荣誉狐 帖子：5154 积分：31434 威望：0 精华：8 注册：2008/9/8 12:27:00 		  发帖心情 Post By：2010/8/15 22:56:00 [显示全部帖子]

以下是引用liuruihua在2010-8-15 22:45:00的发言：

感谢mr725的帮助，在下还是有点愚钝，这个库存似乎是一次性的，出库后好象不能即时更新，能否把此命令直接写入一楼例子“物品出库”表的datacolchanged事件中？

自己做啊，有问题再问大家吧。  想要现成，不如下载一个免费的软件使用就是了，这里是交流的地方，大家可以互相解决学习中碰到的问题。
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.09375 秒, 5 次数据查询