如何使用PagedDataSource來做DataRepeater的分頁的效果
点击次数：32 次 发布日期：2008-11-27 00:56:22 作者：源代码网
|
其<ItemTemplate>更是讓我們能隨心所欲的決定資料的排放方式.可惜的是他 們不像Datagrid那樣,有內建的分頁功能. 如何解決這個不能分頁的問題呢?在這篇文章中將會介紹如何使用 PagedDataSource Class 來解決分頁的問題. 簡單的介紹幾個常用到的 PagedDataSource Class Public Properties DataSource - 資料來源 AllowPaging - true 允許分頁;false 不允許. PageSize - 決定重複多少次 PageCount - 總共有幾頁 CurrentPageIndex - 目前所在的頁數 IsFirstPage - 是第一頁嗎,回傳True or False IsLastPage - 是最後一頁嗎,回傳True or False 下面就是範例(剪貼就可以直接跑了) -------------------------------------------------------------------------------- <%@ Page Language="VB" %> <%@ import Namespace="System.Data" %> <script runat="server"> Sub Page_Load(Sender As Object, E As EventArgs) Dim Pgds As PagedDataSource = New PagedDataSource() Pgds.DataSource = CreateDataSource().DefaultView Pgds.AllowPaging = True Pgds.PageSize = 6 "決定重複多少次 lblTotalPage.text = Pgds.PageCount.ToString() Dim CurrentPage As Integer If Not Request.QueryString("Page") Is Nothing Then CurrentPage=Convert.ToInt32(Request.QueryString("Page")) Else CurrentPage=1 End If Pgds.CurrentPageIndex = CurrentPage-1 lblCurrentPage.Text = "Page: " + CurrentPage.ToString() If Not Pgds.IsFirstPage Then lnkPrev.NavigateUrl=Request.CurrentExecutionFilePath + "?Page=" + Convert.ToString(CurrentPage-1) End If If Not Pgds.IsLastPage Then lnkNext.NavigateUrl=Request.CurrentExecutionFilePath+ "?Page=" + Convert.ToString(CurrentPage+1) End If Repeater1.DataSource=Pgds Repeater1.DataBind() End Sub Function CreateDataSource() As Datatable "This part is an example from Asp.net QuickStart "You can change this part with your own Dataset Dim dt As DataTable Dim dr As DataRow Dim i As Integer "create a DataTable dt = New DataTable dt.Columns.Add(New DataColumn("IntegerValue", GetType(Integer))) dt.Columns.Add(New DataColumn("StringValue", GetType(String))) dt.Columns.Add(New DataColumn("DateTimeValue", GetType(DateTime))) dt.Columns.Add(New DataColumn("BoolValue", GetType(Boolean))) "Make some rows and put some sample data in For i = 0 To 50 dr = dt.NewRow() dr(0) = i dr(1) = "Item " + i.ToString() dr(2) = DateTime.Now.ToShortTimeString If (i Mod 2 <> 0) Then dr(3) = True Else dr(3) = False End If "add the row to the datatable dt.Rows.Add(dr) Next Return dt End Function </script> <html><head> <title>DataRepeater Paging Example</title> <style type=text/css> BODY { FONT: 10px Verdana, Arial, Helvetica, "sans serif"; COLOR: #000000; } .txt { FONT-SIZE: 12px } </style> </head> <body> <form name=form1 method=post runat="server"> <table class=txt width="100%" border=0> <tbody><tr><td> <asp:HyperLink id=lnkPrev runat="server"><< Prev</asp:HyperLink> <asp:HyperLink id=lnkNext runat="server">Next >></asp:HyperLink> <asp:Label id=lblCurrentPage runat="server"></asp:Label> of <asp:Label id=lblTotalPage runat="server"></asp:Label> </td></tr></tbody></table> <asp:repeater id=Repeater1 runat="server"> <ItemTemplate> <hr align="left" width="60%" size="1"> <table class=txt width="100%" border="0"> <tr> <td> Order Date: <%# DataBinder.Eval(Container.DataItem, "DateTimeValue", "{0:d}") %> </td><tr><td> Quantity: <%# DataBinder.Eval(Container.DataItem, "IntegerValue", "{0:N2}") %> </td><tr><td> Item: <%# DataBinder.Eval(Container.DataItem, "StringValue") %> </td><tr><td> Order Date: <asp:CheckBox id=chk1 Checked="<%# DataBinder.Eval(Container.DataItem, "BoolValue") %>" runat="server"/> </td></tr></table> </ItemTemplate> </asp:repeater> <hr hight="1"> <p>Datasource:Microsoft QuickStart Example http://cht.gotdotnet.com/quickstart/aspplus/doc/webdatabinding.aspx </p> <p>Reference:MSDN .NET Framework Class Library http://msdn.microsoft.com/library/default.asp?url=/library/en-us/cpref/html/frlrfsystemwebuiwebcontrolspageddatasourceclasstopic.asp </p><p> Paging with Repeater control in ASP.NET http://www.charon.co.uk/content.aspx?CategoryID=28&ArticleID=21 </p></form></body></htm  源代码网供稿. |
