Rss & SiteMap
Foxtable(狐表) http://www.foxtable.com
蓝老师,按时段加载数据,用下面的代码加载后日期列是降序,如何实现“日期”列升序排列,请指导
加载本月的订单:
Dim y As Integer = Date.Today.Year
Dim m As Integer = Date.Today.Month
Dim dt1 As New
Date(y,
m, 1)
Dim dt2 As New
Date(y,
m, Date.DaysInMonth(y,
m)) '获取本月的最后一天
Dim Filter As String
Filter = "日期 >= '" & dt1 & "' And日期 <= '" & dt2 & "'"
'使用SQL Server作为数据源
DataTables("订单").LoadFilter = Filter
DataTables("订单").Load()