以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  Datatable加载后遍历只能轮循到第一行  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=191494)

--  作者:fanglu0518
--  发布时间:2024/4/19 13:16:00
--  Datatable加载后遍历只能轮循到第一行
代码:
DataTables("表A").LoadFilter = "状态 <> \'完成\' and 状态 <> \'取消\'"
DataTables("表A").Load()
Output.Show(DataTables("表A").TotalRows)
Dim i As Integer = 0
For Each dr As DataRow In DataTables("表A").DataRows
    i = i + 1 
    Output.Show( i & ":" & dr("状态"))
Next


输出只有第一行:
508
1:未启动

而实际上有508行。

--  作者:有点蓝
--  发布时间:2024/4/19 13:47:00
--  
做了分页吧,TotalRows是分页的总行数,下面才是加载后的行数

Output.Show(DataTables("表A").DataRows.count)
--  作者:fanglu0518
--  发布时间:2024/4/19 13:55:00
--  
For Each dr As DataRow In DataTables("表A").DataRows
    i = i + 1 
    Output.Show( i & ":" & dr("状态"))
Next

老师,这一段代码,为什么没有遍历到整个加载的表

--  作者:有点蓝
--  发布时间:2024/4/19 14:00:00
--  
肯定已经遍历到整个加载的表。没有的数据应该是没有加载出来,如果之前做了分页,把分页去掉

DataTables("表A").Loadtop = nothing
DataTables("表A").LoadFilter = "状态 <> \'完成\' and 状态 <> \'取消\'"
DataTables("表A").Load()