主题：分页加载，总页数返回0

Dim cnt As Long

Dim cmd As New SQLCommand

cmd.ConnectionName = Vars("gsLianJieMC")

cmd.CommandText = "Se lect count(*) From {表A}"

cnt = cmd.ExecuteScalar()

msgbox(cnt)                        '此处报2000多

With DataTables("表A")

    .LoadFilter = "" '加载条件

    .LoadReverse = False      '倒序,默认按主键倒序

    .LoadTop = 200

    .LoadPage = 0   

    .Load()

    msgbox(.TotalPages)        '此处报0.

End With

何解？？？？？？

我这里是个通用的函数，其他表通过这个函数加载没有问题，就一张表有问题，刚好显示200行，无法翻页。

用LoadOver设置其它列作为分页依据有没有问题？