Foxtable(狐表)用户栏目专家坐堂 → 批量取消审核


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

主题:批量取消审核

美女呀,离线,留言给我吧!
qinlao666
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:444 积分:3794 威望:0 精华:0 注册:2015/3/3 10:06:00
批量取消审核  发帖心情 Post By:2017/3/13 8:46:00 [显示全部帖子]

If  user.name = "开发者" Then
    If Tables("采购台账2017").Current.IsNull("审批") Then
        For Each r As Row In Tables("付款申请单_付款申请单").GetCheckedRows
            r("审核") = Nothing
            r("审核人") = Nothing
            r.Save()
        Next
    Else
        MessageBox.Show("此行已被批准,不能取消审核!")
    End If
   
   
Else
    MessageBox.show("你无取消审核权限!")
End If

 

老师请帮我看下这行代码哪里出现问题,现在测试结果是不管审批列是否为空,都不能取消审核列


 回到顶部
美女呀,离线,留言给我吧!
qinlao666
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:444 积分:3794 威望:0 精华:0 注册:2015/3/3 10:06:00
  发帖心情 Post By:2017/3/13 9:32:00 [显示全部帖子]

If  user.name = "开发者" Then
    For Each r As Row In Tables("付款申请单_付款申请单").GetCheckedRows
        r("审核") = False
        r("审核人") = Nothing
        r.Save()
    Next
Else
    MessageBox.show("你无取消审批权限!")
End If

 

老师,我把If Tables("采购台账2017").Current.IsNull("审批") Then这个条件取消,就能取消审核

请教下老师,会是什么其他事件影响到了


 回到顶部
美女呀,离线,留言给我吧!
qinlao666
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:444 积分:3794 威望:0 精华:0 注册:2015/3/3 10:06:00
  发帖心情 Post By:2017/3/13 11:23:00 [显示全部帖子]

问题解决了,谢谢老师

 回到顶部