Foxtable(狐表)用户栏目专家坐堂 → 逻辑列勾选


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

主题:逻辑列勾选

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


加好友 发短信
等级:八尾狐 帖子:1838 积分:13006 威望:0 精华:0 注册:2013/6/10 9:23:00
逻辑列勾选  发帖心情 Post By:2013/12/4 11:02:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看

订单明细表里的所有5项已完成都打钩后, 订单主表里的已完成自动打钩
订单明细表里的所有5项已完成都打钩后, 订单主表里的已完成自动打钩, 发现订单明细表里有一项未完成,去掉勾后订单主表的已完成自动去掉勾勾


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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/12/4 11:10:00 [只看该作者]

这个之前有人问过一模一样的问题,你到论坛上找找也许还能找到例子

在订单明细表中的DataColChanged事件
if e.datacol.name="已完成" then
   dim rlist as list(of datarow)=e.datatable.select("订单编号='" & e.datarow(" 订单编号") & "' and 已完成=true")
   if rlist.count=e.datatable.select("订单编号='" & e.datarow(" 订单编号") &"'").count then
     e.DataRow.GetParentRow("订单主表")("已完成")=true
    else
      e.DataRow.GetParentRow("订单主表")("已完成")=false
   end if
end if

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


加好友 发短信
等级:八尾狐 帖子:1838 积分:13006 威望:0 精华:0 注册:2013/6/10 9:23:00
  发帖心情 Post By:2013/12/4 11:18:00 [只看该作者]

上次就是我问的,问题没解决,再问一次, 谢谢!

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/12/4 11:19:00 [只看该作者]

都做过例子,怎么没解决? 我记得做过例子测试的.

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


加好友 发短信
等级:八尾狐 帖子:1838 积分:13006 威望:0 精华:0 注册:2013/6/10 9:23:00
  发帖心情 Post By:2013/12/4 11:22:00 [只看该作者]

.NET Framework 版本:2.0.50727.3649
Foxtable 版本:2013.10.14.1
错误所在事件:表,订单明细表,DataColChanged
详细错误信息:
Exception has been thrown by the target of an invocation.
Column ' 订单编号' does not belong to table 订单明细表.

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/12/4 11:23:00 [只看该作者]

多了个空格 去一下

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


加好友 发短信
等级:八尾狐 帖子:1838 积分:13006 威望:0 精华:0 注册:2013/6/10 9:23:00
  发帖心情 Post By:2013/12/4 13:38:00 [只看该作者]

.NET Framework 版本:2.0.50727.3649
Foxtable 版本:2013.10.14.1
错误所在事件:表,订单明细表,DataColChanged
详细错误信息:
Exception has been thrown by the target of an invocation.
Object reference not set to an instance of an object.

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


加好友 发短信
等级:八尾狐 帖子:1838 积分:13006 威望:0 精华:0 注册:2013/6/10 9:23:00
  发帖心情 Post By:2013/12/4 13:41:00 [只看该作者]

发错了

 


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2013/12/4 20:10:00 [只看该作者]

 If e.DataCol.name="已完成" Then
    If  e.DataRow.GetParentRow("订单主表") IsNot Nothing Then
        Dim rlist As List(of DataRow)=e.DataTable.Select("订单编号='" & e.DataRow(" 订单编号") & "' and 已完成=true")
        If rlist.count=e.DataTable.Select("订单编号='" & e.DataRow(" 订单编号") &"'").count Then
            e.DataRow.GetParentRow("订单主表")("已完成")=True
        Else
            e.DataRow.GetParentRow("订单主表")("已完成")=False
        End If
    End If
End If

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


加好友 发短信
等级:八尾狐 帖子:1838 积分:13006 威望:0 精华:0 注册:2013/6/10 9:23:00
  发帖心情 Post By:2014/2/27 15:05:00 [只看该作者]

以下是引用Bin在2013-12-4 11:10:00的发言:
这个之前有人问过一模一样的问题,你到论坛上找找也许还能找到例子

在订单明细表中的DataColChanged事件
if e.datacol.name="已完成" then
   dim rlist as list(of datarow)=e.datatable.select("订单编号='" & e.datarow(" 订单编号") & "' and 已完成=true")
   if rlist.count=e.datatable.select("订单编号='" & e.datarow(" 订单编号") &"'").count then
     e.DataRow.GetParentRow("订单主表")("已完成")=true
    else
      e.DataRow.GetParentRow("订单主表")("已完成")=false
   end if
 
这个代码有个问题, 就是订单明细表一旦新增数据, 订单主表的已完成就自动打钩了, 我要的是订单明细表了所有的已完成都打钩后订单主表里的已完成才能打钩, 求解!
end if


 回到顶部
总数 20 1 2 下一页