zoukankan      html  css  js  c++  java
  • ASP构造大数据量的分页SQL语句

     1<%@Language = "VBScript" Codepage = "936"%>
     2<%
     3'分页sql语句生成代码
     4Function 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 [" & FldName & "] Asc"
    10    Else
    11        StrTemp = "< (Select Min([" & FldName & "])"
    12        StrOrder = " Order By [" & FldName & "] Desc"
    13    End If
    14    
    15    '若是第1页则无须复杂的语句
    16    If PageIndex = 1 Then
    17        StrTemp = ""
    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 & " Where " & StrWhere
    27        End If
    28        StrSql = StrSql & StrOrder & ") As Tbltemp)"
    29        If StrWhere <> "" Then
    30            StrSql = StrSql & " And " & StrWhere
    31        End If
    32        StrSql = StrSql & StrOrder
    33    End If
    34    GetPageSql = StrSql        '返回sql语句
    35End Function
    36Response.Write(GetPageSql("Message","MessageID",10,1,0,""))
    37%>
  • 相关阅读:
    技术债务墙:一种让技术债务可见并可协商的方法
    墙裂推荐
    shell 脚本通过Webhook 发送消息到微信群
    关于中医的一段对话 [ZZ] -- 思维训练故事
    应用深度神经网络预测学生期末成绩
    Python中的模块引用机制
    批量修改含空格的文件名「Linux」
    Markdown数学公式语法
    批处理修改IP
    FTD团队目录
  • 原文地址:https://www.cnblogs.com/Dicky/p/160042.html
Copyright © 2011-2022 走看看