以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]如何只加载当月的数据?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=1033)

--  作者:gdtgl
--  发布时间:2008/10/31 20:34:00
--  
如果是内部表,参考帮助BeforeLoadInnerTable,
如果是外部表,参考帮助BeforeLoadOuterTable。

不算复杂,改改帮助的代码。

--  作者:狐狸爸爸
--  发布时间:2008/10/31 20:37:00
--  
Dim Year As Integer = Date.Today.Year
Dim Month As Integer = Date.Today.Month
Dim FirstDay As Date = New Date(Year,Month,1) \'第一天
Dim LastDay As Date = New Date(Year,Month,Date.DaysInMonth(Year,Month)) \'最后一天
DataTables("订单").LoadFilter = "[日期] >= #" & FirstDay & "# And [日期] <= #" & LastDay & "#"
DataTables("订单").Load()

--  作者:狐狸爸爸
--  发布时间:2008/11/1 8:17:00
--  
3楼代码用于在已经打开项目的情况下,动态加载数据。

如果要在打开项目之前按条件加载数据:

如果是内部表,参考帮助BeforeLoadInnerTable事件
如果是外部表,参考帮助BeforeLoadOuterTable事件