主题：关联表问题

三个表，父子孙，父和子用列1关联，子和孙用列1和列2关联，一开始做了个窗口把父和父子关联表和父子孙关联表放在一起，结果发现从别的表导入数据到父子孙关联表无法导入，后来改成父和父子关联表一窗口，子和子孙关联表一窗口，发现从别的表导入数据到子孙关联表还是无法导入。

 

    For Each r1 As Row In Tables("导入订单_订单明细表").GetCheckedRows

        Dim  r2 As Row = Tables("出库主表.出库明细表").AddNew

        r2("客户订单号") = r1("客户订单号")

        r2("物料编号") = r1("物料编号")

        r2("未交数量") = r1("未交数量")

        r2("实交数量") = r1("未交数量")

    Next

    e.Form.close   

Else

    MessageBox.Show("该笔订单无未交项!")

End If

 用例子说明你的问题。不能导入什么意思？

 

 用代码可以任意的导入数据。

例子已上传，第一笔fa piao明细可以正常导入，第二笔明细就不好用了。实际开fa piao会出现一张fa piao对应半张订单，甚至是订单中一种产品的一定数量，等到下张fa piao再开这张订单的这种产品的剩余数量。所以才要这样去设计，让fa piao号可以对应任意订单、订单明细。

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:关联表导入数据.zip

 哪个窗口哪个按钮，你哪个表要导入哪个表的数据？

导入订单按钮打开导入fa piao订单窗口，点击导入后自动在fa piao表.fa piao订单表新增相应行，从订单表抓数据，导入到fa piao订单表

这个意思？

 

If Tables("导入fa piao明细_销售台账").rows.Count > 0 Then
   
    For Each r1 As Row In Tables("导入fa piao明细_销售台账").GetCheckedRows
        Dim  r2 As Row = Tables("fa piao表.fa piao订单表.fa piao明细表").AddNew
        r2("产品编码") = r1("产品编码")     
    Next
    e.Form.close
Else
    MessageBox.Show("该笔订单无未开piao项!")
End If

是啊，用的这个代码，但是有的订单明细能够导入，有的不能，我觉得是关联表的问题，因为如果是二级关联表，没出现过这种问题，这三个表是三级，而且关联列不是用的一个，因为fa piao表里没有销售合同代码，而fa piao订单表和fa piao明细表的关联列必须有销售合同代码，否则没法找到相应的订单明细。我尝试了用两个关联列和只用fa piao号码一个关联列两种方法，都不可行。有什么好办法呢？

必须有对应的内容才能关联起来的。不然就增加一列辅助列咯

申请fa piao号码就是辅助列，但是销售合同编码这一列没法在fa piao表中存在，因为一张fa piao可能对应多个销售合同编码

关联表新增行的时候，关联列都是来自父表当前选择的行。