Foxtable(狐表)用户栏目专家坐堂 → 请指教程序修改


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

主题:请指教程序修改

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


加好友 发短信
等级:婴狐 帖子:16 积分:198 威望:0 精华:0 注册:2016/3/7 16:57:00
请指教程序修改  发帖心情 Post By:2016/3/14 13:52:00 [只看该作者]



If  e.DataRow("通知_状态") = True Then   '是逻辑列
    e.DataRow("通知_经办员") = User.Name
    e.DataRow("通知_时间") = Date.Now()
Else
    e.DataRow("通知_经办员") = Nothing
    e.DataRow("通知_时间") = Nothing
End If
If  e.DataRow("签收_申请") = True Then  '是逻辑列
    e.DataRow("签收_管理员") = User.Name
Else
    e.DataRow("签收_管理员") = Nothing
End If

当点击“签收_申请”或"签收_申请"时,"通知_经办员"和"通知_时间"、"签收_管理员"均在变化,不能实现使点击"通知_状态"时只是"通知_经办员"和"通知_时间"生效,点击"签收_申请"时只是"签收_管理员"生效,怎么修改程序。
谢谢!


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


加好友 发短信
等级:小狐 帖子:341 积分:3400 威望:0 精华:0 注册:2013/5/17 10:55:00
  发帖心情 Post By:2016/3/14 14:11:00 [只看该作者]

Select Case e.DataCol.name
    Case "通知_状态"        
        If  e.DataRow("通知_状态") = True Then   '是逻辑列
            e.DataRow("通知_经办员") = User.Name
            e.DataRow("通知_时间") = Date.Now()
        Else
            e.DataRow("通知_经办员") = Nothing
            e.DataRow("通知_时间") = Nothing
        End If
    Case "签收_申请"
        If  e.DataRow("签收_申请") = True Then  '是逻辑列
            e.DataRow("签收_管理员") = User.Name
        Else
            e.DataRow("签收_管理员") = Nothing
        End If
End Select

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


加好友 发短信
等级:婴狐 帖子:16 积分:198 威望:0 精华:0 注册:2016/3/7 16:57:00
  发帖心情 Post By:2016/3/14 16:13:00 [只看该作者]

谢谢!

 回到顶部