gaskell.org

Digg style custom paging for GridViews in ASP.NET

5 Responses

1. gaskell.org » Now with 100% more .net Says:
   April 18th, 2007 at 9:47 pm

   [...] get things started here’s a live demo of the digg style paging in asp.net project I created.   del.icio.us [...]

2. Chuck snyder Says:
   July 6th, 2007 at 1:27 pm

   Wow, that’s much nicer than the standard numbers. I’ll give it a try in my current project.

   Thanks for the work.

   chuck

3. Chuck snyder Says:
   July 6th, 2007 at 2:46 pm

   Ahhha, with a little tweaking it works just fine. Here is the code converted to VB

   Partial Class _Default
   Inherits System.Web.UI.Page

   Private Const NEXT_PREVIOUS_CLASS As String = “nextprev”
   Private Const CURRENT_CLASS As String = “current”
   Private Const PREVIOUS_TEXT As String = “« Previous”
   Private Const NEXT_TEXT As String = “Next »”

   Dim AllowMultiColumnSorting As Boolean = True

   Dim sortExpression As String

   Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

   If Me.CurrentPage > 0 Then
   Me.Gridview1.PageIndex = Me.CurrentPage - 1
   Else
   Me.Gridview1.PageIndex = 0
   End If

   End Sub

   #Region “Paging Procedures”

   Private ReadOnly Property CurrentPage() As Integer
   Get
   Dim thispage As Integer
   If Not IsNothing(thispage) Then
   thispage = Convert.ToInt32(Request.QueryString(”Page”))
   If thispage = 0 Then
   thispage += 1
   End If
   End If

   Return thispage
   End Get
   End Property

   Protected Sub Gridview1_DataBound(ByVal sender As Object, ByVal e As EventArgs)
   Dim container As Panel = DirectCast(Gridview1.BottomPagerRow.FindControl(”pagingContainer”), Panel)
   container.Controls.Add(GetPreviousControl())
   Me.AddMainPaging(container)
   container.Controls.Add(GetNextControl())
   End Sub

   Private Sub AddMainPaging(ByVal container As Panel)
   ‘ the number of pages to display
   ‘ around the currently selected page
   Dim adjacents As Integer = 3

   ‘ don’t need to break it up
   If Gridview1.PageCount Me.CurrentPage AndAlso Me.CurrentPage > (adjacents * 2) Then
   ‘ hide on both sides
   Me.AddFirstTwo(container)
   Me.AddRange(Me.CurrentPage - adjacents, Me.CurrentPage + adjacents, container)
   Me.AddLastTwo(container)
   Else
   ‘ hide just the beginning
   Me.AddFirstTwo(container)
   Me.AddRange(Gridview1.PageCount - (2 + (adjacents * 2)), Gridview1.PageCount, container)
   End If
   End If
   End Sub

   Private Sub AddDots(ByVal container As Panel)
   Dim dots As New Label()
   dots.Text = “….”
   container.Controls.Add(dots)
   End Sub

   Private Sub AddFirstTwo(ByVal container As Panel)
   Me.AddRange(1, 2, container)
   Me.AddDots(container)
   End Sub

   Private Sub AddLastTwo(ByVal container As Panel)
   Me.AddDots(container)
   Me.AddRange(Me.Gridview1.PageCount - 1, Me.Gridview1.PageCount, container)
   End Sub

   Private Sub AddRange(ByVal startIndex As Integer, ByVal endIndex As Integer, ByVal container As Panel)
   For i As Integer = startIndex To endIndex
   container.Controls.Add(Me.GetMainControl(i))
   Next
   End Sub

   Private Function GetMainControl(ByVal currentIndex As Integer) As Control
   If Gridview1.PageIndex + 1 = currentIndex Then
   Return GetLabel(currentIndex.ToString(), CURRENT_CLASS)
   Else
   Return GetHyperLink(currentIndex.ToString(), Nothing, String.Format(”~/Default.aspx?Page={0}”, currentIndex))
   End If
   End Function

   Private Function GetPreviousControl() As Control
   If Me.Gridview1.PageIndex

4. Chuck snyder Says:
   July 11th, 2007 at 2:04 pm

   I see there is a text length limit. So, here’s the rest of the vb.net code:
   Private Function GetPreviousControl() As Control
   If Me.gridView.PageIndex

5. raja Says:
   August 6th, 2008 at 1:21 pm

   hello

   Great job ……

   how can use this code ASP.net Ajax enabled paging , should convert the querystring process to postback ?

   code sample please

   thanks in advance

Leave a Comment