= ""
18 If StrWhere <> "" Then
19 Strtmp = " Where " & StrWhere
20 End If
21 StrSql = "Select Top " & PageSize & " * From [" & TblName & "]" & Strtmp & StrOrder
22 Else ''''若不是第1页，构造sql语句
23 StrSql = "Select Top " & PageSize & " * From [" & TblName & "] Where [" & FldName & "]" & StrTemp & _
24 " From (Select Top " & (PageIndex-1) * PageSize & " [" & FldName & "] From [" & TblName & "]"
25 If StrWhere <> "" Then
26 StrSql = StrSql & "上一页 [1] [2] [3] 下一页 |
