Foxtable(狐表)用户栏目专家坐堂 → 为什么提示窗口会弹出四次


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

主题:为什么提示窗口会弹出四次

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/8/26 16:28:00 [显示全部帖子]

Systemready = False

If e.DataCol.Name  = "核准"
    If e.NewValue = False Then
        If User.IsRole("QA核准") = False Then
            e.Cancel = True
        Else
            Dim Result As DialogResult
            Result = MessageBox.Show("注意 ! 此操作不可撤销 ! 您确认要进行核准吗 ? ", "删除确认", MessageBoxButtons.YesNo, MessageBoxIcon.Warning)
            If Result = DialogResult.No Then
                e.Cancel = True
            End If
        End If
    ElseIf e.NewValue = True Then
        If User.IsRole("后台维护") = False AndAlso User.IsRole("QA审批") = False Then
            e.Cancel = True
        Else
            Dim Result As DialogResult
            Result = MessageBox.Show("注意 ! 此操作不可撤销 ! 您确认要进行核准吗 ? ", "删除确认", MessageBoxButtons.YesNo, MessageBoxIcon.Warning)
            If Result = DialogResult.No Then
                e.Cancel = True
            End If
        End If
    End If
End If
Systemready = True


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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/8/26 17:28:00 [显示全部帖子]

可以打开,你把bin文件夹删除看看

 


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20150826172819.jpg
图片点击可在新窗口打开查看


 回到顶部