以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  内部数据表,可不可以初始的时候不加载,但是菜单里面设计个按钮,可以选择性的加载啊  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=32920)

--  作者:jljacky
--  发布时间:2013/5/10 14:56:00
--  内部数据表,可不可以初始的时候不加载,但是菜单里面设计个按钮,可以选择性的加载啊

该项目中有好几个数据表,名字叫"套装a","套装b","套装c","套装d"等,我希望达到效果是属于经理组的用户刚刚打开的时候不加载这些表,这样运行速度可以快一点,然后在菜单里设好的文本框输入套装名,按下按钮,就会加载相应的数据表

 

我先在BeforeLoadInnerTable事件里面写代码如下

If e.DataTableName.StartsWith("套装")

    e.Cancel = (e.User.Group="经理")

End If

然后在菜单设计器里面添加了一个文本框,名称"inputtablename"

一个标准按钮,名称"Load"

按钮的click事件代码如下:

Dim Setname As String= RibbonTabs("Table").Groups("统计").Items("加载套装表").Items("inputtablename").text

Dim dt As DataTable=DataTables("套装" & Setname)

If dt IsNot Nothing Then

dt.Load()

Else

MessageBox.Show("系统中无此套装!")

End If

 

测试后先出来一个对话框(不是我预先设置的)

 


此主题相关图片如下:1.jpg
按此在新窗口浏览图片
然后再出来一个对话框(是我预先设置的)

 


此主题相关图片如下:2.jpg
按此在新窗口浏览图片

--  作者:jljacky
--  发布时间:2013/5/10 14:57:00
--  
求高手帮我看看,是不是我的设置本来就有矛盾呢,如何才能实现我要的效果呢?
--  作者:Bin
--  发布时间:2013/5/10 15:03:00
--  
参考帮助http://www.foxtable.com/help/topics/1933.htm

你都没加载这个表,怎么会存在这个Datatable呢,Datatable只有加载了该表才会存在的.

--  作者:XYT
--  发布时间:2013/5/10 15:05:00
--  
不然就要有个表存储表名,判断输入的值是否存在,不存在就提示系统中无此套装,存在才加载
--  作者:jljacky
--  发布时间:2013/5/10 15:06:00
--  
和和,那我只能用设置visible的方法让它显示咯
--  作者:Bin
--  发布时间:2013/5/10 15:07:00
--  
以下是引用jljacky在2013-5-10 15:06:00的发言:
和和,那我只能用设置visible的方法让它显示咯

如果你只是为了显示隐藏这也做可以满足你需求. 
如果你是为了少加载点数据提高速度,那么这样做没什么意义.