以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  摘要内容来自子表  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=46788)

--  作者:seal51
--  发布时间:2014/2/27 16:25:00
--  摘要内容来自子表
订单主表有个摘要列, 自动填写订单明细表里的各行产品名称列的名称,如何做, 好像原来在论坛里见过, 怎么也找不到了?
--  作者:Bin
--  发布时间:2014/2/27 16:26:00
--  
http://www.foxtable.com/help/topics/1458.htm
--  作者:seal51
--  发布时间:2014/2/27 16:30:00
--  

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

--  作者:Bin
--  发布时间:2014/2/27 16:54:00
--  
http://www.foxtable.com/help/topics/1394.htm
[此贴子已经被作者于2014-2-27 16:54:22编辑过]

--  作者:seal51
--  发布时间:2014/2/27 19:00:00
--  

在窗口中也是这么做吗


--  作者:seal51
--  发布时间:2014/2/27 19:02:00
--  
在订单主表中, 不是excel报表中
--  作者:seal51
--  发布时间:2014/2/27 19:09:00
--  

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

--  作者:有点甜
--  发布时间:2014/2/27 19:12:00
--  
订单主表->datacolchanged事件

if e.datacol.name = "摘要" then
    dim str as string = ""
    for each dr as datarow in e.datarow.GetChildRows("订单明细表")
        str += dr("产品名称") & ","
    next
    e.datarow("摘要") = str.trim(",")
next

订单明细表->datacolchanged

if e.datacol.name = "产品名称" then
    DataTables("订单表").DataCols("摘要").RaiseDataColChanged("订单号 = \'" & e.DataRow("订单号") & "\'")
end if
[此贴子已经被作者于2014-2-27 19:12:51编辑过]

--  作者:lsy
--  发布时间:2014/2/27 19:29:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:拼接子表商品名称.table


--  作者:seal51
--  发布时间:2014/2/28 0:14:00
--  

非常感谢!但如果删除订单明细表某项,产品名称能自动消失吗