以文本方式查看主题
- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 关于SQL外部数据表的加载 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=2969)
|
-- 作者:woodiy
-- 发布时间:2009/5/31 10:27:00
-- 关于SQL外部数据表的加载
数据源采用的是SQL外部数据源,为了加快项目的打开速度
能否在打开项目的时候只加载表格,而不加载任何记录, 然后通过按钮“加载”来有选择的加载呢,或是打开某个表格时再加载呢?
|
-- 作者:yangming
-- 发布时间:2009/5/31 10:31:00
--
我想应该可以,我没用过外部数据源,你可以试试的
|
-- 作者:狐哥
-- 发布时间:2009/5/31 10:40:00
--
BeforeLoadOuterTable
普通用户可以忽略本事件。 准备加载外部数据表的时候执行,可以在此修改Select语句,这样不仅可以只加载需要的字段和数据,甚至可以从另一个数据表中加载数据。 如果数据量很大,可以通过用此事件设置条件,只加载部分数据,甚至不加载数据,在运行的过程中再加载数据。 注意此时必须通过e.User来引用用户。
e参数属性:
DataTableName: 正在加载的数据表名称 SelectString: Select语句 User: 登录用户
其实用法和BeforeLoadInnerTable事件一样,只不过用SelectString代替了Fields属性和Filter属性,这是为了是考虑到专业级用户的需要,充分发挥外部数据源的特性,并提供更大的灵活性。 使用这个事件需要一定的Sql语言知识,后续章节会有专门的Sql语言入门介绍,目前只需掌握一下Select语句的基本语法。 Select语句的语法如下:
Select * From [表名] Where 条件表达式
上面的表名是外部数据源的真实表名,不是FoxTable中的表名,两者有的时候并不相同。 上面的语句是加载所有字段,如果是加载部分字段,语法是:
Select [字段1], [字段2], [字段3], … From [表名] Where 条件表达式
条件表达式语法和我们之前介绍的表达式基本相同,你也可以参考一下BeforeLoadInnerTable事件中的例子。 我们开始举例,假定订单表来自于一个外部数据源。
示例一
对于录入员,则只加载今天的订单:
If e.DataTableName = "订单" AndAlso e.User.Name = "录入员" Then e.SelectString = "Select * From [订单] Where [日期] = #" & Date.Today & "#" End If
示例二
对于录入员,只加载10天以内的订单:
If e.DataTableName = "订单" AndAlso e.User.Name = "录入员" Then Dim StartDate As Date = Date.Today().AddDays(-10) e.SelectString = "Select * From [订单] Where [日期] > #" & StartDate & "#" End If
示例三
只加载折扣在0.05和0.15之间的订单:
If e.DataTableName = "订单" Then e.SelectString = "Select * From [订单] Where [折扣] Between 0.05 And 0.15" End If
通过上面三个例子可以看出: 1、 如果只是掌握我们用得着的,那么Sql语言其实很简单,不要把它看得太高深,后续章节会有专门的SQL语言入门介绍。 2、 BeforeLoadOuterTable和BeforeLoadInnerTable虽然参数的形式不一样,但是对于大多数人来说,使用起来其实是一回事。
如是一点数据都不要加,可更改WHERE条件,比如 where [工作号] = \'★\'
[此贴子已经被作者于2009-5-31 10:41:45编辑过]
|
-- 作者:woodiy
-- 发布时间:2009/5/31 11:04:00
--
BeforeLoadOuterTable
准备加载外部数据表的时候执行,可以在此修改Select语句,如果数据量很大,可以通过用此事件设置条件,只加载部分数据甚至不加载数据,在运行的过程中再加载数据。
注意此时必须通过e.User来引用用户。
如果想让录入员在打开项目时,默认为不加载数据. 在项目的BeforeLoadOuterTable 属性中加入如下代码:
If e.DataTableName = "订单"
AndAlso e.User.Name = "录入员"
Then e.SelectString = "Select * From [订单] Where False" End
If
注意此时必须通过e.User来引用用户。 --------------我现在还没有设置用户,该如何使用此功能,谢谢!
[此贴子已经被作者于2009-5-31 11:48:49编辑过]
|
-- 作者:狐哥
-- 发布时间:2009/5/31 11:38:00
--
e.User.Type <> UserTypeEnum.Developer 不等于开发者
|
-- 作者:woodiy
-- 发布时间:2009/5/31 11:53:00
--
我现在的BeforeLoadOuterTable 设置如下代码:
If e.DataTableName = "通讯往来" AndAlso e.User.Type <> UserTypeEnum.Developer Then e.SelectString = "Select * From [通讯往来] Where False" End If
其它地方都没有任何设置,为什么表格数据还是加载的啊!
|
-- 作者:狐哥
-- 发布时间:2009/5/31 11:56:00
--
哥哥呀,你是用哪个用户登录的呀,如是开发者登录,你要改 <> 改成 = 号就不会加了呀,如上是只要不是 开发者 都不会加的
|
-- 作者:woodiy
-- 发布时间:2009/5/31 12:12:00
-- 回复:(woodiy)关于SQL外部数据表的加载
此主题相关图片如下:未标题-1.gif
楼上的兄弟啊,请再指点一下,我这样设置还是不行啊! If e.DataTableName = "通讯往来" AndAlso e.User.Type = UserTypeEnum.Developer Then e.SelectString = "Select * From [通讯往来] Where False" End If
谢谢!
|
-- 作者:狐哥
-- 发布时间:2009/5/31 12:21:00
--
e.SelectString = "Select * From [通讯往来] Where False"
呵,这个我不懂,我只会按帮助来搞,将WHERE FALSE 改成 其它字符列试试,如where 编号 = \'##\'
|
-- 作者:八婺
-- 发布时间:2009/5/31 12:21:00
--
在设置外部表的“过滤/排序”中直接设置false不行吗?
|