[求助]关联表的问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]关联表的问题

共有3988人关注过本帖树形打印复制链接主题：[求助]关联表的问题

mickywang

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：婴狐帖子：16 积分：168 威望：0 精华：0 注册：2015/2/27 8:57:00

[求助]关联表的问题 发帖心情

Post By：2015/3/9 13:41:00 [只看该作者]

有兩个表, 分别是表A和表B, 表A是父表, 它们的第一列为关联列, 我想把表A的第二列的资料写入到表B的第二列中(假设表B有1000筆资料要写進相对的资料). 请问如何写?

我用下面的方法写了, 只能把父表的第一筆写進表B中, 而且每一筆的资料是一様, 高手们请幇幇忙~~~

Dim dr As DataRow = DataTables("dtf").DataRows(0)

Dim pr As DataRow = dr.GetParentrow("vendor")

.ReplaceFor("vcode", pr("vendorcode") )

Bin

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2015/3/9 14:14:00 [只看该作者]

for each dr as datarow in datatables("表A").datarows

datatables("表B").replacefor("第二列",dr("第二列"),"关联列 = '" & dr("关联列") & "'")

[此贴子已经被作者于2015/3/9 14:29:45编辑过]

有点甜

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2015/3/9 14:22:00 [只看该作者]

For Each dr As DataRow In DataTables("表A").datarows
DataTables("表B").replacefor("第二列", dr("第二列"), "关联列 = '" & dr("关联列") & "'")
Next

mickywang

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：婴狐帖子：16 积分：168 威望：0 精华：0 注册：2015/2/27 8:57:00

Post By：2015/3/9 14:35:00 [只看该作者]

谢谢兩位的幇忙!

主题：[求助]关联表的问题