主题：表中不存在rownum列

Dim page As Long = 1 

Dim r1 As Integer = (Page - 1) * 50 + 1

Dim r2 As Integer = Page * 50

Dim sql As String 

sql = "S elect * From (Se  lect Row_Number() Over(Order by 第一列) As RowNum, * from 表A) As a "

sql = sql & " Where RowNum >= " & r1 & " And RowNum <= " & r2

DataTables("表A").SQLLoad(sql)

所以没办法一个一个写列名。

还有其他的好方法吗

拜托了