以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- Or 前缺少操作数 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=109361) |
-- 作者:LTHERO -- 发布时间:2017/11/10 11:05:00 -- Or 前缺少操作数 审批按钮代码如下: If _UserGroup = "销售经理" Then Dim r As Row = Tables("销售审批_table1").Current Tables("销售审批_table1").filter = Tables("销售审批_table1").filter & " Or _Identify = " & r("_Identify") r("销售审批人") = _UserName r("销售审批时间") = Date.Today() r.Save() Else MessageBox.show("你无审批权限!") End If |
-- 作者:有点甜 -- 发布时间:2017/11/10 11:09:00 -- Tables("销售审批_table1").filter = iif(Tables("销售审批_table1").filter>"", Tables("销售审批_table1").filter & " Or _Identify = " & r("_Identify"), "") |
-- 作者:LTHERO -- 发布时间:2017/11/10 11:48:00 -- 好的 谢谢,大佬甜! |