标题：[求助]如何只加载当月的数据？

1楼

liuruihua 发表于：2008/10/31 20:03:00

用户已锁定！

2楼

gdtgl 发表于：2008/10/31 20:34:00

如果是内部表，参考帮助BeforeLoadInnerTable，
如果是外部表，参考帮助BeforeLoadOuterTable。

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

3楼

狐狸爸爸 发表于：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()

4楼

liuruihua 发表于：2008/10/31 21:58:00

用户已锁定！

5楼

狐狸爸爸 发表于：2008/11/1 8:17:00

3楼代码用于在已经打开项目的情况下，动态加载数据。

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

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

共5 条记录, 每页显示 10 条, 页签: [1]