- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 销售订单窗口中，如何在窗口中添加明细记录？ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=25386)
-- 发布时间：2012/11/8 3:11:00
-- 销售订单窗口中，如何在窗口中添加明细记录？
销售订单窗口中，如何在窗口中添加明细记录？
此主题相关图片如下：1.jpg
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:单据窗口.rar |
注：不想通过关联表处理
-- 发布时间：2012/11/8 7:52:00
--
两表通过订单号关联，窗口表绑定到销售主表.销售明细就可以了
-- 发布时间：2012/11/8 8:15:00
--
Dim r As DataRow = DataTables("销售明细").AddNew
r("销售订单编码") = Tables("销售主表").Current("销售订单编码")
-- 发布时间：2012/11/8 9:05:00
--
Dim r As DataRow = DataTables("销售明细").AddNew r("销售订单编码") = Tables("销售主表").Current("销售订单编码") |
可以了。
上述方法与
CurrentTable.AddNew()
区别之处在哪里呢
-- 发布时间：2012/11/8 9:09:00
--
你的副本设置了筛选条件，你新增的行，必须符合这个，才可以在副本中显示出来的。
-- 发布时间：2012/11/8 9:16:00
--
我参考帮助中的[ 用Table控件模拟关联表 ]在：
销售订单_Table2 对应的表（销售明细）的
DataRowAdding 事件中加了类似:
If CurrentTable.Name = "销售订单_Table2" Then \'如果当前表是模拟的关联表
Dim r As Row = Tables("销售订单_Table1").Current
If r IsNot Nothing Then
e.DataRow("销售订单id") = r("销售订单id")
End If
End If
配合：CurrentTable.AddNew()
也可以
您上面的方法更加方便了