Foxtable(狐表)用户栏目专家坐堂 → 个数条件统计


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

主题:个数条件统计

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


加好友 发短信
等级:九尾狐 帖子:2159 积分:14971 威望:0 精华:0 注册:2017/10/12 13:00:00
个数条件统计  发帖心情 Post By:2020/4/23 11:04:00 [只看该作者]

用户已被锁定

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


加好友 发短信
等级:超级版主 帖子:106665 积分:542508 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/4/23 11:15:00 [只看该作者]

e.DataRow("完成状态") = "已完成"

改为

e.DataRow("完成状态") = "待分解"

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


加好友 发短信
等级:九尾狐 帖子:2159 积分:14971 威望:0 精华:0 注册:2017/10/12 13:00:00
  发帖心情 Post By:2020/4/23 12:58:00 [只看该作者]

用户已被锁定

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


加好友 发短信
等级:超级版主 帖子:106665 积分:542508 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/4/23 13:52:00 [只看该作者]

Dim cnt1 As Integer = DataTables("开发资料信息").SQLCompute("Count(完成状态)","[成品编码] = '" & e.DataRow("成品编码") & "' and [次级编码] = '" & e.DataRow("次级编码") & "'")
If cnt1 = 0 Then
    e.DataRow("完成状态") = "待分解"
Else
cnt1= DataTables("开发资料信息").SQLCompute("Count(完成状态)","[成品编码] = '" & e.DataRow("成品编码") & "' and [次级编码] = '" & e.DataRow("次级编码") & "' and 完成状态 = '待处理'")
If cnt1 > 0 Then
    e.DataRow("完成状态") = "待处理"
Else
    e.DataRow("完成状态") = "已完成"
End If
End If

 回到顶部