以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  默认加载近两天的数据  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=84727)
--  作者：scofields
--  发布时间：2016/5/9 11:11:00
--  默认加载近两天的数据
红袍老师，我想实现项目一打开，所有表都默认加载近两天的数据，这个代码可怎么写？
--  作者：大红袍
--  发布时间：2016/5/9 11:24:00
--  

If e.DataTableName = "订单" Then
    Dim StartDate As Date = Date.Today().AddDays(-2)
    e.Filter = "[日期] >= #" & StartDate & "#"
End If

 

http://www.foxtable.com/help/topics/0669.htm