| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]非关联表的数据同步（同一张表如何实现两列数据同步） (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=109163) |
| -- 作者：ddb505 -- 发布时间：2017/11/6 9:49:00 -- [求助]非关联表的数据同步（同一张表如何实现两列数据同步） 同一张表纸芯上盖，列表项目来自另一张材料表，两列数据用列表项目各自选择不同的内容，如何用代码实现非关联表的数据同步？下面是第一列原料厚度的数据实现了同步，第二列胶价格的该如何写？ Select Case e.DataCol.name Case "原料厚度" Dim dr As DataRow = DataTables("纸芯上盖").Find("原料厚度 = \'" & e.OldValue & "\'") If dr Is Nothing Then dr = DataTables("纸芯上盖").AddNew() dr("原料厚度") = e.DataRow("原料厚度") dr("原料单价") = e.DataRow("原料单价") Else dr("原料厚度") = e.DataRow("原料厚度") End If Case "原料单价" Dim dr As DataRow = DataTables("纸芯上盖").Find("原料厚度 = \'" & e.DataRow("原料厚度") & "\'") If dr IsNot Nothing Then dr(e.DataCol.Name) = e.DataRow(e.DataCol.Name) End If End Select |
| -- 作者：有点甜 -- 发布时间：2017/11/6 10:45:00 -- 参考
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=107485&skin=0
|