Foxtable(狐表)用户栏目专家坐堂 → 关联表(子表)目录树不能自动更新问题


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

主题:关联表(子表)目录树不能自动更新问题

帅哥哟,离线,有人找我吗?
chengjingliang
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:250 积分:1813 威望:0 精华:0 注册:2012/6/28 13:53:00
关联表(子表)目录树不能自动更新问题  发帖心情 Post By:2017/7/19 14:53:00 [只看该作者]

我在关联表的子表内录入代码,独立表时候可以自动更新,作为子表时候目录树不能自动更新

'清单明细表筛选树自动跟新
If MainTable.Name = "清单明细" Then
    Dim tb As New DropTreeBuilder
    tb.SourceTable = DataTables("工料单价") '指定目录树表
    tb.TreeCols = "工料一类|工料二类|工料名称" '指定用于生成目录树的列
    tb.SourceCols = "工料一类|工料二类|工料名称|工料单位|工料ID|综合单价" '指定数据来源列
    tb.ReceiveCols = "工料一类|工料二类|工料名称|工料单位|工料ID|综合单价" '指定数据接收列
    Tables("清单明细").Cols("工料一类").DropTree = tb.Build()
End If
图片点击可在新窗口打开查看此主题相关图片如下:a.png
图片点击可在新窗口打开查看
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/7/19 15:03:00 [只看该作者]

写到CurrentTableChanged事件

 

If CurrentTable.Name like "*清单明细*" Then
    Dim tb As New DropTreeBuilder
    tb.SourceTable = DataTables("工料单价") '指定目录树表
    tb.TreeCols = "工料一类|工料二类|工料名称" '指定用于生成目录树的列
    tb.SourceCols = "工料一类|工料二类|工料名称|工料单位|工料ID|综合单价" '指定数据来源列
    tb.ReceiveCols = "工料一类|工料二类|工料名称|工料单位|工料ID|综合单价" '指定数据接收列
    CurrentTable.Cols("工料一类").DropTree = tb.Build()
End If
[此贴子已经被作者于2017/7/19 15:03:54编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
chengjingliang
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:250 积分:1813 威望:0 精华:0 注册:2012/6/28 13:53:00
  发帖心情 Post By:2017/7/20 10:29:00 [只看该作者]

谢谢老师指点,

 回到顶部