以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  内部权限转外部权限  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=102190)

--  作者:zoudezhao
--  发布时间:2017/6/14 19:40:00
--  内部权限转外部权限

If e.DataTableName = "表A"
    e.Filter = "创建人 = \'" & e.User.Name & "\'"
End If
If e.DataTableName = "表A" AndAlso e.User.Group = "审核" Then
    e.Filter = "金额 Is not Null"
End If
If e.DataTableName = "表A" AndAlso e.User.Group = "总经理" Then
    e.Filter = "[_Identify] Is not Null"
End If

这段内部代码我想转成sql的外部表代码应该怎么转就是BeforeLoadInnerTable事件转成BeforeLoadotherTable事件


--  作者:有点色
--  发布时间:2017/6/14 20:47:00
--  

If e.DataTableName = "表A"
    e.selectString = "select * from {表A} where 创建人 = \'" & e.User.Name & "\'"
End If
If e.DataTableName = "表A" AndAlso e.User.Group = "审核" Then
    e.selectString = "select * from {表A} where 金额 Is not Null"
End If
If e.DataTableName = "表A" AndAlso e.User.Group = "总经理" Then
    e.selectString = "select * from {表A}"
End If


--  作者:zoudezhao
--  发布时间:2017/6/15 8:55:00
--  

感谢色超版