以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  AfterOpenProject事件中，如何利用代码将没有加载进来的表数据直接从后台读取出来呢？  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=115737)
--  作者：李孝春
--  发布时间：2018/3/13 16:04:00
--  AfterOpenProject事件中，如何利用代码将没有加载进来的表数据直接从后台读取出来呢？
If  Tables("菜单风格").Current("风格") = "风格一" Then   
    RibbonTabs("涉案卷宗材料及款物二维码管理").Groups("卷宗入库").Items("卷宗查询").Visible = True
    RibbonTabs("涉案卷宗材料及款物二维码管理").Groups("卷宗使用").Visible = True
    RibbonTabs("涉案卷宗材料及款物二维码管理").Groups("款物入库").Items("款物查询").Visible = True
    RibbonTabs("涉案卷宗材料及款物二维码管理").Groups("款物使用").Visible = True
    \'RibbonTabs("涉案卷宗材料及款物二维码管理").Groups("ClipBoard").Items("Paste").text = "今天是:" & format(Date.now, "yyyy年MM月dd日 dddd")
Else
    RibbonTabs("涉案卷宗材料及款物二维码管理").Groups("卷宗入库").Items("卷宗查询").Visible = False
    RibbonTabs("涉案卷宗材料及款物二维码管理").Groups("卷宗使用").Visible = False
    RibbonTabs("涉案卷宗材料及款物二维码管理").Groups("款物入库").Items("款物查询").Visible = False
    RibbonTabs("涉案卷宗材料及款物二维码管理").Groups("款物使用").Visible = False
End If


“菜单风格”表没有直接加载在项目里面来，在么实现利用代码直接调用后台数据库里面“菜单风格”表中对应的“风格”列数据值呢？
--  作者：有点甜
--  发布时间：2018/3/13 16:28:00
--  

如果是表格没有加载进来

 

http://www.foxtable.com/webhelp/scr/0695.htm

 

http://www.foxtable.com/webhelp/scr/1279.htm

 

如果是数据没有加载进来

 

http://www.foxtable.com/webhelp/scr/1928.htm

 

http://www.foxtable.com/webhelp/scr/2915.htm

 
--  作者：李孝春
--  发布时间：2018/3/13 17:36:00
--  回复：（有点甜）如果是表格没有加载进来 ht...
当前是表和数据都没有加载进来哦 在么处理呢？
--  作者：有点甜
--  发布时间：2018/3/13 17:38:00
--  
以下是引用李孝春在2018/3/13 17:36:00的发言：
当前是表和数据都没有加载进来哦 在么处理呢？

 

这样

 

http://www.foxtable.com/webhelp/scr/0695.htm

 

http://www.foxtable.com/webhelp/scr/1279.htm

 

http://www.foxtable.com/webhelp/scr/0696.htm