以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]统计订单交货数量  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=19011)

--  作者:wolf0417
--  发布时间:2012/4/24 22:35:00
--  [求助]统计订单交货数量

我现在有2个表,一个订单表,一个出货记录表


图片点击可在新窗口打开查看此主题相关图片如下:订单.jpg
图片点击可在新窗口打开查看


 


图片点击可在新窗口打开查看此主题相关图片如下:出货记录.jpg
图片点击可在新窗口打开查看

我想在订单表的出货数量列自动填入对应订单号的出货数量该如何处理啊?

例如:“订单”表的第2行的 出货数量 列,自动填入200000(统计 表“出货数量”中 订单号=9161099835 的出货数量)

 

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:欧伏罱.table


--  作者:mr725
--  发布时间:2012/4/24 22:50:00
--  

出货记录表:订单号=9161099835   哪有出货数量20000???

 

是要在订单表中合计某订单号的出货数量吧。

[此贴子已经被作者于2012-4-24 22:51:21编辑过]

--  作者:mr725
--  发布时间:2012/4/24 23:04:00
--  

出货记录表的datacolchanged事件中:

Dim r As Row = Tables("出货记录").current
Dim Sum As Double
Sum = Tables("出货记录").Compute("Sum(出货数量)", "订单号 = \'" & r("订单号") & "\'")
output.show(Sum & r("订单号") )
Dim dr As DataRow
dr = DataTables("订单").Find("订单号 = \'" & r("订单号") & "\'")
If dr IsNot Nothing Then
    dr("出货数量") = sum
End If


--  作者:y2287958
--  发布时间:2012/4/24 23:13:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:欧伏罱.zip


--  作者:wolf0417
--  发布时间:2012/4/25 17:40:00
--  
感谢大家的帮助,两种方法感觉都挺好的,谢谢