Foxtable(狐表)用户栏目专家坐堂 → 订单表某个操作,同时锁定订单明细表(对应于订单编号的))


  共有8736人关注过本帖树形打印复制链接

主题:订单表某个操作,同时锁定订单明细表(对应于订单编号的))

帅哥哟,离线,有人找我吗?
kevin
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:359 积分:3403 威望:0 精华:0 注册:2011/8/2 20:53:00
订单表某个操作,同时锁定订单明细表(对应于订单编号的))  发帖心情 Post By:2012/5/18 15:29:00 [只看该作者]

 订单表  和  订单明细表  以 订单编号 关联着

订单表有一个"标记"的逻辑列,当标记列为TRUE时,则锁定明细表对应的明细,请问用代码如何做?

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47449 积分:251065 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2012/5/18 15:32:00 [只看该作者]

参考这个事件:
 
http://www.foxtable.com/help/topics/0636.htm


 
For each dr As DataRow = e.DataRow.GetChildRows("订单明细")
   dr.Locked = True
Next
 


 回到顶部
帅哥哟,离线,有人找我吗?
kevin
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:359 积分:3403 威望:0 精华:0 注册:2011/8/2 20:53:00
  发帖心情 Post By:2012/5/18 15:36:00 [只看该作者]

 狐爸,我仍然不明白怎么用呀.
当我在订单表,在订单编号为10001的行里面,将"标记"列打勾时,可以同时将对应应该订单编号的明细都锁定;

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47449 积分:251065 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2012/5/18 15:43:00 [只看该作者]

如果这样,在DatacolChanged设置代码:
 
Select case  e.DataCol.Name
    Case “标记”
          For each dr As DataRow = e.DataRow.GetChildRows("订单明细")
               dr.Locked = e.Datarow("标记")
         Next
End Select

 回到顶部
帅哥哟,离线,有人找我吗?
kevin
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:359 积分:3403 威望:0 精华:0 注册:2011/8/2 20:53:00
  发帖心情 Post By:2012/5/18 18:00:00 [只看该作者]

 狐爸,实在不好意思,我试了还是不行,

 回到顶部
帅哥哟,离线,有人找我吗?
小猪鑫鑫
  6楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:832 积分:5867 威望:0 精华:6 注册:2011/5/27 11:41:00
  发帖心情 Post By:2012/5/18 19:42:00 [只看该作者]

楼主:你的明细表是否没有_Locked这列啊,所以才锁不了

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47449 积分:251065 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2012/5/18 21:00:00 [只看该作者]

这个代码是没有道理不行的。

如果不行,请自己设计好这两个表,输入几行测试数据传上来,我帮你看看怎么回事。

提示提问,最好是自己做好表传上来,做到这一点的话,你这个问题几分钟就解决了。


 回到顶部
帅哥哟,离线,有人找我吗?
rzq1211
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:18 积分:336 威望:0 精华:1 注册:2009/4/8 10:52:00
  发帖心情 Post By:2012/5/19 9:51:00 [只看该作者]

Select case  e.DataCol.Name
    Case “标记”
          For each dr As DataRow in e.DataRow.GetChildRows("订单明细")
               dr.Locked = e.Datarow("标记")
         Next
End Select

 回到顶部