以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  设置用户名加载表不成功  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=157827)
--  作者：zhuangyun
--  发布时间：2020/10/30 9:54:00
--  设置用户名加载表不成功
Select Case e.DataTableName
    Case "一览表2015至2019年", "附件1_1","附件1_2","附件1_3","一览表2016至2018年","附件2_1","附件2_2","附件2_3"
        e.Cancel = (e.User.Name = "特色")
    Case "一览表2016至2018年","附件2_1","附件2_2","附件2_3","附件3_1","附件3_2","附件3_3"
        e.Cancel = (e.User.Name = "基地") 
    Case "一览表2015至2019年", "附件1_1","附件1_2","附件1_3","附件3_1","附件3_2","附件3_3"
        e.Cancel = (e.User.Name = "示范")
End Select

只设置成功了其中一个，在切换用户的时候表没有随用户名一起切换，这是为什么
--  作者：有点蓝
--  发布时间：2020/10/30 10:07:00
--  
先看看：http://www.foxtable.com/webhelp/topics/2242.htm

Select Case e.User.Name
    Case "特色"
        Select Case e.DataTableName
            Case "一览表2015至2019年", "附件1_1","附件1_2","附件1_3","一览表2016至2018年","附件2_1","附件2_2","附件2_3"
                e.Cancel = True
        End Select
    Case "基地"
        Select Case e.DataTableName
            Case "一览表2016至2018年","附件2_1","附件2_2","附件2_3","附件3_1","附件3_2","附件3_3"
                e.Cancel =True
        End Select
    Case "示范"
        Select Case e.DataTableName
            Case "一览表2015至2019年", "附件1_1","附件1_2","附件1_3","附件3_1","附件3_2","附件3_3"
                e.Cancel = True
        End Select
End Select
--  作者：zhuangyun
--  发布时间：2020/10/30 10:25:00
--  切换用户无法加载对应表
但是切换用户的时候加载的表还是不变，需要关闭软件之后再打开其他用户名后才能加载对应的表
--  作者：有点蓝
--  发布时间：2020/10/30 10:31:00
--  
这个代码和切换用户没有什么关系，切换用户要到另外的事件写其它代码处理，可以结合参考一下：http://www.foxtable.com/webhelp/topics/1600.htm