| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 关联表的父表添加数据后自动更新子表 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=90076) |
| -- 作者：lilywang -- 发布时间：2016/9/5 10:08:00 -- 关联表的父表添加数据后自动更新子表 销售合同表：季度，合同号（关联列），片区，客户名称，合同金额 （父表） 客户欠款表：季度，合同号（关联列），片区，客户名称，合同金额 （子表） 我想要父表增加一行 添加数据 子表自动增加一行并且有刚刚添加的数据 请问怎么实现？ |
| -- 作者：有点蓝 -- 发布时间：2016/9/5 10:12:00 -- 参考：http://www.foxtable.com/webhelp/scr/2477.htm |
| -- 作者：lilywang -- 发布时间：2016/9/5 10:35:00 -- 试了没有用 只有合同号子表加进去了 其他列没有更新 |
| -- 作者：有点蓝 -- 发布时间：2016/9/5 10:38:00 -- 上传你的代码或者例子 |
| -- 作者：lilywang -- 发布时间：2016/9/5 10:48:00 -- Select Case e.DataCol.Name Case "合同号" If e.DataRow.IsNull("合同号") = False Then If e.DataRow.GetChildRows("客户欠款表").Count = 0 Then Dim dr As DataRow = DataTables("客户欠款表").AddNew() dr("合同号") = e.DataRow("合同号") End If End If End Select
|
| -- 作者：有点蓝 -- 发布时间：2016/9/5 10:59:00 -- 看懂代码，初学者建议完整看看帮助和视频 Select Case e.DataCol.Name Case "合同号" If e.DataRow.IsNull("合同号") = False Then If e.DataRow.GetChildRows("客户欠款表").Count = 0 Then Dim dr As DataRow = DataTables("客户欠款表").AddNew() dr("合同号") = e.DataRow("合同号") dr("列1") = e.DataRow("列1") ‘’......列2、列3等 End If End If End Select |
| -- 作者：lilywang -- 发布时间：2016/9/5 11:25:00 -- 是的 但是我就是添加完还是没有更新的 Select Case e.DataCol.Name Case "合同号" If e.DataRow.IsNull("合同号") = False Then If e.DataRow.GetChildRows("客户欠款表").Count = 0 Then Dim dr As DataRow = DataTables("客户欠款表").AddNew() dr("合同号") = e.DataRow("合同号") dr("片区") = e.DataRow("片区") dr("合同金额") = e.DataRow("合同金额") dr("客户名称") = e.DataRow("客户名称") End If End If End Select |
| -- 作者：有点蓝 -- 发布时间：2016/9/5 11:27:00 -- 上传例子说明 |
| -- 作者：lilywang -- 发布时间：2016/9/5 11:40:00 -- 我引用的是外部数据源不知道有没有关系？ |
| -- 作者：有点蓝 -- 发布时间：2016/9/5 11:47:00 -- 没有关系。 赋值的列不能是表达式列
|