Foxtable(狐表)用户栏目专家坐堂 → openQQ接收问题


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

主题:openQQ接收问题

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


加好友 发短信
等级:童狐 帖子:236 积分:1922 威望:0 精华:0 注册:2017/10/1 12:15:00
openQQ接收问题  发帖心情 Post By:2018/10/30 17:17:00 [只看该作者]

之前由审核状态变为批准状态时可以推送通知,现在又加了一些代码就不行了,不知道是不是这么写,应该怎么改一下?

If User.isrole("审核") And dr.DataTable.Name = "lhjc"  Then
    If dr("检测状态") = "待审核" Then
        PopMessage("有新的报告需要审核!","提示",PopIconEnum.Infomation)
    End If
ElseIf User.isrole("批准") And dr.DataTable.Name = "lhjc"  Then
    If dr("检测状态") = "待批准" Then
        PopMessage("有新的报告需要批准!","提示",PopIconEnum.Infomation)
    End If
ElseIf User.isrole("审核") And dr.DataTable.Name = "jljz"  Then
    If dr("检测状态") = "待审核" Then
        PopMessage("有新的报告需要审核!","提示",PopIconEnum.Infomation)
    End If
ElseIf User.isrole("批准") And dr.DataTable.Name = "jljz"  Then
    If dr("检测状态") = "待批准" Then
        PopMessage("有新的报告需要批准!","提示",PopIconEnum.Infomation)
    End If
ElseIf user.isrole("采购管理") And dr.DataTable.Name = "cggl" Then
    If dr("提交人") <> "" Then
        popmessage("有新的采购需求,请及时处理!","提示",popiconenum.infomation)
    End If

End If


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


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

1、本来的代码是怎样的可以正常?贴出之前的代码

 

2、加入msgbox,弹出各个值,看执行到哪里后停止了执行


 回到顶部