以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  求助!跨表引用问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=139357)

--  作者:天堂囚鸟99
--  发布时间:2019/8/12 11:19:00
--  求助!跨表引用问题
现有三张表:A表、产品列表,包含产品名称、规格、一级代理价、二级代理价、市场价等列
                B表、客户信息,包含客户名称、客户代理等级等列
                C表、订单明细,包含客户姓名、产品名称、规格、单价等列
需求:需要让“订单明细”中“单价”列所显示的价格为:该客户代理等级所享受的该产品的代理价。
这样的代码该怎么写?

--  作者:有点蓝
--  发布时间:2019/8/12 11:38:00
--  
截图看看这些表的数据是怎么样的,或者上传实例说明
--  作者:天堂囚鸟99
--  发布时间:2019/8/12 13:24:00
--  截图
图片点击可在新窗口打开查看能看见不
[此贴子已经被作者于2019/8/12 13:30:57编辑过]

--  作者:有点蓝
--  发布时间:2019/8/12 13:50:00
--  
上传图片的方法:http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=78
--  作者:天堂囚鸟99
--  发布时间:2019/8/12 14:05:00
--  实例截图
从上向下依次为物料信息表、客户信息表、订单表、订单明细表。
需要将订单明细表中的单价,设置为该客户所享受的代理等级所对应的该物料的相同代理价格

--  作者:有点蓝
--  发布时间:2019/8/12 15:00:00
--  
没看到上传的图片,请正确上传图片
--  作者:天堂囚鸟99
--  发布时间:2019/8/12 15:35:00
--  图片上传不齐
老师,不好意思,图片上传不了,我一开IE浏览器就蓝屏
--  作者:天堂囚鸟99
--  发布时间:2019/8/12 15:42:00
--  终于上传起了


图片点击可在新窗口打开查看此主题相关图片如下:1565589726(1).png
图片点击可在新窗口打开查看
这下好像可以了

从上向下依次为物料信息表、客户信息表、订单表、订单明细表。

需要将订单明细表中的单价,设置为该客户所享受的代理等级所对应的该物料的相同代理价格

--  作者:有点蓝
--  发布时间:2019/8/12 15:57:00
--  
datacolchanged事件

If e.DataCol.name = "订单编号" OrElse e.DataCol.name = "物料名称"
    Dim pr As DataRow = e.DataRow.GetParentRow("订单")
    If pr IsNot Nothing Then
        Dim dr As DataRow = DataTables("物料信息").Find("物料名称=\'" & e.DataRow("物料名称") & "\'")
        If dr IsNot Nothing Then
            e.DataRow("单价") = dr(pr("客户权限"))
        End If
    End If
    
End If



--  作者:天堂囚鸟99
--  发布时间:2019/8/12 17:08:00
--  谢谢,老师!
感谢老师的指导,我在慢慢的消化下图片点击可在新窗口打开查看图片点击可在新窗口打开查看图片点击可在新窗口打开查看