以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  加载100多条数据为什么需要二十几秒?  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=179835)

--  作者:9EQ98
--  发布时间:2022/9/13 13:18:00
--  加载100多条数据为什么需要二十几秒?
Dim d1 As Date 
Tables("CMID").Visible = True
Dim 耗时 As String = ""
Dim t As TimeSpan 

d1 = Date.Now
DataTables("器型参数").LoadFilter = "([器型分类] =\'杯\') And ([成型工艺] =\'滚压\')"
DataTables("器型参数").LoadTop = "100 PerCent"
DataTables("器型参数").Load
T = Date.Now() - d1
耗时 = t.TotalSeconds & "秒(" & DataTables("器型参数").DataRows.Count & ")" & DataTables("器型参数").Name
OUTPUT.SHOW(耗时)

d1 = Date.Now
DataTables("CMID").LoadFilter = ""
DataTables("CMID").LoadTop = "100 PerCent"
DataTables("CMID").Load
T = Date.Now() - d1
耗时 = t.TotalSeconds & "秒(" & DataTables("CMID").DataRows.Count & ")"  & DataTables("CMID").Name
OUTPUT.SHOW(耗时)

25.642秒(144)器型参数
2.001秒(1493)CMID

图片点击可在新窗口打开查看


图片点击可在新窗口打开查看

图片点击可在新窗口打开查看


图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2022/9/13 13:42:00
--  
什么数据库?远程还是本地?

把所有和这个表有关的事件代码注释掉再测试慢不慢?或者这行测试,新建一个项目,添加数据源添加这个表测试加载慢不慢?