- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 求助--关于自动获取某些字段内容 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=16045)
-- 发布时间：2012/2/1 8:49:00
-- 求助--关于自动获取某些字段内容
我们现在做一个合同管理系统，合同表 与 合同明细表关联
合同表 输入完成后，去编辑 合同明细表
希望实现 点击增加明细后 合同明细表中新增加行的“合同编号”字段 能自动添加 合同表中
选中行的“合同编号”中的内容，
下面是之前用的代码，只能自动提取最后一行的内容，但若编辑 合同表 中其他行时就不行了
谢谢先！
Dim t As Table = Tables("合同")
Dim dr As DataRow
dr = DataTables("合同").DataRows(t.Rows.Count - 1)
e.DataRow("合同编号")= dr("合同编号")
-- 发布时间：2012/2/1 9:08:00
--
很简单:
1、二者通过合同编号建立关联。
2、在合同明细表的DataColChanged事件设置代码：
if e.DataCol.Name = "合同编号" AndAlso e.DataRow.isNull("合同编号") = False then
if e.DataRow.GetParentRow("合同表") is Nothing Then
Dim dr As DataRow = DataTables("合同表").AddNew()
dr("合同编号") = e.DataRow("合同编号")
end if
end if
-- 发布时间：2012/2/1 10:48:00
--
我把表发过来了，您帮我看看，是不是我哪设置有问题？ 点增加明细时，合同编号没有提过来
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:123.table |
-- 发布时间：2012/2/1 12:06:00
--
我之前可能误解你的意思了，应该这样：
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:123.table |
-- 发布时间：2012/2/1 13:31:00
--
谢谢狐狸爸爸！