以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]如何防止递归函数目录树数据再编辑时排除本身的下级的问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=62451)
--  作者：张良才
--  发布时间：2015/1/1 16:49:00
--  [求助]如何防止递归函数目录树数据再编辑时排除本身的下级的问题
求大侠修改以下为上级列生成动态下拉框字典候选值的代码

If MainTable.Name = "表A" Then 

    Dim  dmp As New  TableDataMap

    dmp.DataTable = "表A"  

    dmp.ValueCol = "名称" 

    dmp.DisplayCol = "名称" 

    dmp.ListCols =  "名称"

dmp.Filter = "[上级] <> \'" & Tables("表A").Current("名称") & " \'"

    Tables("表A").Cols("上级").DataMap = dmp.CreateDataMap()  

End If
--  作者：有点甜
--  发布时间：2015/1/4 12:16:00
--  

 数据字典，不能做联动。数据字典，只能定死的。

 

 用其他方法代替 http://www.foxtable.com/help/topics/2465.htm