Foxtable(狐表)用户栏目专家坐堂 → 关联表突然出问题了


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

主题:关联表突然出问题了

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


加好友 发短信
等级:五尾狐 帖子:1174 积分:8782 威望:0 精华:0 注册:2012/4/18 16:28:00
关联表突然出问题了  发帖心情 Post By:2017/7/6 12:55:00 [只看该作者]

请教老师,今天在系统中设置的关联表的子表,在系统中增加子表行录入数据没有问题,也能保存到服务器上,但是在系统中重新加载子表后无法显示数据行,只显示表头              使用的是高级开发版

 

1. 父/子表是通过关联的编号列设置,不是_Idengtify

 

2.父表通过外部数据表菜单可以加载全部行进来,子表通过外部数据表菜单加载进来后,单独点击子表(表B)可见数据行,但关联到父表下的子表(表A.表B)不显示数据行

 

3.停靠设置没有任何设置,是系统默认的

 

4.关联的编号是一致的,列名也一致无错误

 

5.关闭FOXTABLE,重新打开,加载父表没有问题,加载子表就不显示数据行   

 

经测试今天打开FOXTABLE在系统中的全部子表类型的表都不显示数据行,在窗口增加按钮加载也只在例如表B显示数据行,在表A.表B的关联模式下子表都不显示数据行,只有表头。???????????    再测试,用模拟关联表的形式,可以显示,系统哪里有问题

 

6.子表只有如下代码,没有其他代码

If e.DataCol.Name = "编号" Then 
    If e.NewValue Is Nothing Then 
        e.DataRow("信息编号") = Nothing 
        e.DataRow("项目编号") = Nothing 
        e.DataRow("项目名称") = Nothing 
   Else
        Dim dr As DataRow       
        dr = DataTables("图签图号编辑器").Find("[编号] = '" & e.NewValue & "'")
        If dr IsNot Nothing Then 
            e.DataRow("信息编号") = dr("信息编号")
            e.DataRow("项目编号") = dr("项目编号")
            e.DataRow("主项目名称") = dr("项目名称")
        End If
    End If
End If

[此贴子已经被作者于2017/7/6 13:38:41编辑过]

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


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

 表A、表B 加载出来的数据,编号列的值是否对应了?

 

 只有表A、表B的值对应,关联表才会显示内容。

 

 如果还有问题,实例上传上来。


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


加好友 发短信
等级:五尾狐 帖子:1174 积分:8782 威望:0 精华:0 注册:2012/4/18 16:28:00
  发帖心情 Post By:2017/7/6 16:16:00 [只看该作者]

 

            

 

无法做实例,全部都接在服务器上   就这个父表和子表有问题,经测试要双击子表行才能显示 

 

例如     表A.表B  (子表不显示数据)    表B(可以显示数据)双击目标行的“编号”列后,表A.表B(这时候子表才显示数据)

 

          

 

 


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


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

 你是不是对表A.表B做了筛选?取消筛选呢?

 

Tables("表A.表B").Filter = ""


 回到顶部