以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  关联表突然出问题了  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=103345)

--  作者:douglas738888
--  发布时间: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编辑过]

--  作者:有点甜
--  发布时间:2017/7/6 14:18:00
--  

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

 

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

 

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


--  作者:douglas738888
--  发布时间:2017/7/6 16:16:00
--  

 

            

 

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

 

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

 

          

 

 


--  作者:有点甜
--  发布时间:2017/7/6 16:43:00
--  

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

 

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