ASP构造大数据量的分页SQL语句 选择自 AppleBBS 的 Blog

1 < %@Language  =   " VBScript "  Codepage  =   " 936 " % >
 2 < %
 3 ' 分页sql语句生成代码
 4 Function  GetPageSql(TblName,FldName,PageSize,PageIndex,OrderType,StrWhere)
 5      Dim  StrTemp,StrSql,StrOrder
 6      ' 根据排序方式生成相关代码
 7      If  OrderType  =   0   Then
 8         StrTemp  =   " > (Select Max([ "   &  FldName  &   " ])"
 9         StrOrder  =   "  Order By [ "   &