以文本方式查看主题

-  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=65100)
--  作者：mickywang
--  发布时间：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
--  发布时间：2015/3/9 14:14:00
--  
for each dr as datarow in datatables("表A").datarows
      datatables("表B").replacefor("第二列",dr("第二列"),"关联列 = \'" & dr("关联列") & "\'")
next
[此贴子已经被作者于2015/3/9 14:29:45编辑过]
--  作者：有点甜
--  发布时间：2015/3/9 14:22:00
--  
For Each dr As DataRow In DataTables("表A").datarows
    DataTables("表B").replacefor("第二列", dr("第二列"), "关联列 = \'" & dr("关联列") & "\'")
Next
--  作者：mickywang
--  发布时间：2015/3/9 14:35:00
--  
 

谢谢兩位的幇忙!