老师好!问两个问题,请指教:
1、数据库是阿里云上的sqlserver数据库,窗口表采用分页加载。数据总量百万行时,加载都是很快的,即使分页的每页是5000行,也是秒加载。
如果数据量达到1000万行以上时,即使分页的每页是100行,也会卡得弹出“查询超时”窗口。
这种情况,我把数据库和项目同时放在本机上测试也是一样。
请问是不是代码写的有问题,我的加载代码写在点击目录树节点的事件中:
Dim Filter As String
If e.node.Text = "加载所有数据" Then
Filter = ""
Else
Dim dr As DataRow = e.Node.DataRow
Select Case e.Node.Level
Case 0
Filter ="[代码] = '" & dr("代码") & "'"
End Select
End If
With DataTables("股piao日线")
.LoadFilter = Filter '设置加载条件
.LoadPage = 0 '加载第一页
.LoadTop = e.Form.Controls("ComboBox行数").text '每页100行
.Load()
e.Form.Controls("TextBox1").Value = 1 & "/" & .TotalPages
End With
e.Form.Controls("Table1").Table.Sort = "日期"
2、点击节点后,我想按照日期排序后,再分页,应该怎样处理?
此主题相关图片如下:截屏图片 (3).jpg
![dvubb 图片点击可在新窗口打开查看](UploadFile/2021-10/2021102022451435235.jpg)