关联表的父表记录锁定，怎样把对应的子表记录也锁定？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 关联表的父表记录锁定，怎样把对应的子表记录也锁定？

共有3138人关注过本帖树形打印复制链接主题：关联表的父表记录锁定，怎样把对应的子表记录也锁定？

hitzfeld

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：二尾狐帖子：528 积分：5184 威望：0 精华：0 注册：2017/9/1 23:28:00

关联表的父表记录锁定，怎样把对应的子表记录也锁定？ 发帖心情

Post By：2020/10/30 4:09:00 [显示全部帖子]

父表与子表存在一对多的关系，生成记录后父表的记录锁定容易，但是对应的子表记录要怎么锁定？

hitzfeld

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：二尾狐帖子：528 积分：5184 威望：0 精华：0 注册：2017/9/1 23:28:00

Post By：2020/10/31 2:27:00 [显示全部帖子]

蓝老师好，我做的是在一个独立窗口中的一个“审核”按钮，点击审核，则锁定当前父表记录，同时要锁定对应的子表记录。

但是您的链接中的这个代码要写在DataRowLockedChanged事件

For Each dr As DataRow In e.DataRow.GetChildRows("订单明细")
dr.Locked = e.DataRow.Locked
Next
如果这样，我点击“审核”之后，子表对应记录没有锁定。如果把这个代码放在按钮里面则报错。我改了下面的代码：

Tables("采购单").Current("审核") = "已审核"

Tables("采购单").Current.Locked = True

Dim drs As List(Of DataRow)

drs = DataTables("采购单").DataRows(0).GetChildRows("采购明细")

For Each dr As DataRow In drs

dr.Locked = True

msgbox("已审核")

但是锁定的是采购明细表的第一条记录？而不是主表当前记录对应的第一条记录？不知道错在哪里？请您指点下。谢谢！

hitzfeld

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：二尾狐帖子：528 积分：5184 威望：0 精华：0 注册：2017/9/1 23:28:00

Post By：2020/10/31 12:50:00 [显示全部帖子]

以下是引用有点蓝在2020/10/31 10:13:00的发言：

Dim drs As List(Of DataRow)

drs = Tables("采购单").Current.DataRow.GetChildRows("采购明细")

我晕死哦！我离这个方案就差一点点！！！！图片点击可在新窗口打开查看

我做实验的时候曾经写过：drs = Tables("采购单").Current.Row.GetChildRows("采购明细")，报错。

蓝老师，不是说datatables对应datarow，tables对应row吗？为什么这里可以用tables对应datarow？？？

主题：关联表的父表记录锁定，怎样把对应的子表记录也锁定？