• λ我爱Aspx >> Asp.Net >> 【asp.NET】(vb.net) 分页类
  • 【asp.NET】(vb.net) 分页类

  • :未知  Դ:internet  :2007-5-20 16:40:06  ؼ:.net,asp.net,asp
  • Sql = "select Top " & PageSize & " " & Fields & " from " & Table & " where ( " & Pkey & "<(select min(" & Pkey & ") from (select Top " & PageSize * (CurrentPage - 1) & " " & Pkey & " from " & Table & " where 1=1 " & Filter & SortBy & ") as t)) " & Filter & SortBy

    Else

    Sql = "select Top " & PageSize & " " & Fields & " from " & Table & " where ( " & Pkey & ">(select max(" & Pkey & ") from (select Top " & PageSize * (CurrentPage - 1) & " " & Pkey & " from " & Table & " where 1=1 " & Filter & SortBy & ") as t)) " & Filter & SortBy

    End If

    End Select

    Dim mycmd As SqlCommand

    mycmd = New SqlCommand(Sql, conn)

    Return mycmd.ExecuteReader(CommandBehavior.CloseConnection)

    Ҷƪл˵?
  • һƪ【asp.NET】(vb.net) 分页类
    һƪASP万用分页程序