以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  分组统计表与原表如何建立关联?  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=8874)

--  作者:shixia
--  发布时间:2010/12/18 14:08:00
--  分组统计表与原表如何建立关联?
对表A进行分组统计后,想实现统计表与表A的关联,点统计表的某一行,关联表出现对应的行。我试着用系统的关联,但找不到统计表名。用“模拟数据联动”似乎也不行。请教!
--  作者:mr725
--  发布时间:2010/12/18 15:19:00
--  
http://help.foxtable.com/topics/1942.htm 这里的不行吗?
--  作者:shixia
--  发布时间:2010/12/18 18:06:00
--  

设计一个按钮,代码包含 分组统计代码和 增加关联代码.第一次使用OK,再按一次应该就出错。


--  作者:mr725
--  发布时间:2010/12/18 18:29:00
--  

在按按钮时,先代码删除关联:

 

Relations.Delete("关联1")

 


--  作者:shixia
--  发布时间:2010/12/18 18:30:00
--  

删除了也不行,其它错误来了


--  作者:mr725
--  发布时间:2010/12/18 18:58:00
--  

我测试可以啊,贴出代码看看

 


--  作者:mr725
--  发布时间:2010/12/18 19:06:00
--  

这样正常啊:

 

If Relations.Contains("关联1") Then
   
Relations.Delete("关联1")

End If

 

Dim g As New GroupTableBuilder("统计表1", DataTables("要统计的本表"))
g.Groups.AddDef("分组列")
g.Totals.AddDef("统计列")
g.Build()

\' MainTable = Tables("统计表1")

Relations.Add("关联1",DataTables("要统计的本表").DataCols("编号"),DataTables("统计表1").DataCols("编号"))


--  作者:shixia
--  发布时间:2010/12/18 19:16:00
--  
Dim g As New GroupTableBuilder("统计表1", DataTables("订单"))
g.Groups.AddDef("日期",DateGroupEnum.None)
g.Totals.AddDef("数量", "本季度_销量")
g.Totals.AddDef("数量", "截止本季度_销量",True)
g.Build()
MainTable = Tables("统计表1")
If Relations.Contains("关联1") Then
    Relations.Delete("关联1")
End If
Relations.Add("关联1",DataTables("统计表1").DataCols("日期"),DataTables("订单").DataCols("日期"))

--  作者:shixia
--  发布时间:2010/12/18 19:25:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:关联.rar

打开狐表自带的示例演示,在订单表中增加一窗口,把附件的窗口导入,第一次点按钮关联没有问题,回到订单表,再点一次按钮问题就来了
--  作者:mr725
--  发布时间:2010/12/18 19:43:00
--  

你代码的顺序有问题,这个可以:

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:关联1.rar