- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 【求助】sqltable表怎么实现关联及生成对应数据问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=102503)
-- 发布时间：2017/6/21 12:57:00
-- 【求助】sqltable表怎么实现关联及生成对应数据问题
【求助】sqltable表关联问题
表A与表B以编号作为关联了，现在普通表情况下是可以对应显示关联记录
在后边的SQLtable表中 分别做了表A B，怎么对应关联数据呢？
另外，sqltable中怎么定义关联表呢？ 普通模式下是表A.表B
此主题相关图片如下：2.png
此主题相关图片如下：2.png窗体加载事件代码：
Functions.Execute("关联","新建","表A_表B",e.Form.name & "_Table1","编号",e.Form.name & "_Table4","编号")
Functions.Execute("关联","新建","表A_表B",e.Form.name & "_Table1","编号",e.Form.name & "_Table4","编号")
内部函数 关联 代码
Dim k As String = args(0)
Dim ln As String =args(1) \'关联名称
Dim dtb As String = args(2) \'父表
Dim dcl As String = args(3) \'父列
Dim ztb As String = args(4) \'字表
Dim zcl As String = args(5) \'子列
\'关联类型统一设置为单向关联.
Select Case k
Case "新建"
If Relations.Contains(ln) Then
Else
Relations.Add(ln,DataTables(dtb).DataCols(dcl),DataTables(ztb).DataCols(zcl),RelationPathEnum.one)
End If
Return False
Case "删除"
If Relations.Contains(ln) Then
Relations.Delete(ln)
End If
Return False
End Select
[此贴子已经被作者于2017/6/21 13:08:07编辑过]
-- 发布时间：2017/6/21 14:23:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:sqltable表.table |
-- 发布时间：2017/6/21 15:48:00
-- 回复：（有点色）[upload=table,sqltable表.table]vie...
效果达到了，但这与表的"关联"没关系呀？
-- 发布时间：2017/6/21 15:49:00
--
两个表关联，只是为了设置公式或者是生成第三个关联表。和楼主目的不同。
-- 发布时间：2017/6/21 15:55:00
--
也就是说：窗口中的SQLTable类型的Table,关联的设置是无效的，只能通过2楼的方法，通过代码实现。
可以这样理解吗？
-- 发布时间：2017/6/21 15:57:00
--
以下是引用wyz20130512在2017/6/21 15:55:00的发言：
也就是说：窗口中的SQLTable类型的Table,关联的设置是无效的，只能通过2楼的方法，通过代码实现。
也就是说：窗口中的SQLTable类型的Table,关联的设置是无效的，只能通过2楼的方法，通过代码实现。
可以这样理解吗？
你可以设置关联。但是你需要关联表的效果，你就要引入关联表，而不是子表。
-- 发布时间：2017/6/21 16:29:00
-- 回复：（有点色）[upload=table,sqltable表.table]vie...
谢谢