以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]项目打开时所有表只加载最后5行  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=193222)

--  作者:185723664
--  发布时间:2024/8/27 18:01:00
--  [求助]项目打开时所有表只加载最后5行
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:项目打开时所有表只加载最后5行.foxdb


求助  项目打开时所有表只加载最后5行,下面代码无效求助
AfterOpenProject
For Each dt As DataTable In DataTables
    Dim idx As Integer = math.max(0, dt.DataRows.Count - 5)
    dt.loadFilter = "[_Identify] >= " & dt.DataRows(idx)("_identify")
Next


--  作者:有点蓝
--  发布时间:2024/8/27 20:05:00
--  
http://www.foxtable.com/webhelp/topics/1928.htm

For Each dt As DataTable In DataTables
    dt.loadFilter = ""
dt.LoadTop = 5
dt.LoadOrder = "[_Identify] Desc"
dt.Load
Next