使用PagedDataSource类实现DataList和Repeater控件的分页显示

Asp.net提供了三个功能强大的列表控件：DataGrid、DataList和Repeater控件，但其中只有DataGrid控件提供分页功能。相对DataGrid，DataList和Repeater控件具有更高的样式自定义性，所以很多时候我们喜欢使用DataList或Repeater控件来显示数据。

实现DataList或Repeater控件的分页显示有几种方法：
1、写一个方法或存储过程，根据传入的页数返回需要显示的数据表（DataTable）
2、使用PagedDataSource类
     本篇文章主要说怎么使用PagedDataSource类实现DataList和Repeater控件的分页显示。DataGrid控件内部也使用了PagedDataSource类，PagedDataSource 类封装 DataGrid 控件的属性，这些属性使 DataGrid 可以执行分页。
PagedDataSource 类的部分公共属性：
AllowCustomPaging  获取或设置指示是否启用自定义分页的值。
AllowPaging   获取或设置指示是否启用分页的值。
Count    获取要从数据源使用的项数。
CurrentPageIndex   获取或设置当前页的索引。
DataSource   获取或设置数据源。
DataSourceCount   获取数据源中的项数。
FirstIndexInPage   获取页中的第一个索引。
IsCustomPagingEnabled  获取一个值，该值指示是否启用自定义分页。
IsFirstPage   获取一个值，该值指示当前页是否是首页。
IsLastPage   获取一个值，该值指示当前页是否是最后一页。
IsPagingEnabled   获取一个值，该值指示是否启用分页。
IsReadOnly   获取一个值，该值指示数据源是否是只读的。
IsSynchronized   获取一个值，该值指示是否同步对数据源的访问（线程安全）。
PageCount   获取显示数据源中的所有项所需要的总页数。
PageSize   获取或设置要在单页上显示的项数。
VirtualCount   获取或设置在使用自定义分页时数据源中的实际项数。
      这些属性是否和DataGrid的属性很相似？没错，DataGrid控件就是使用PagedDataSource类来实现数据分页显示的 。下面举个使用PagedDataSource类实现DataList和Repeater控件的分页显示的例子：

view source

print ?

01	public void Page_Load(Object src,EventArgs e)

02

{

03	OleDbConnection objConn=new OleDbConnection(@"Provider=Microsoft.Jet.OLEDB.4.0; Data Source=c:/test.mdb");

04	OleDbDataAdapter objCommand=new OleDbDataAdapter("select * from Users",objConn);

05	DataSet ds=new DataSet();

06	objCommand.Fill(ds);

07	//对PagedDataSource 对象的相关属性赋值

08	PagedDataSource objPds = new PagedDataSource();

09	objPds.DataSource = ds.Tables[0].DefaultView;

10	objPds.AllowPaging = true;

11	objPds.PageSize = 5;

12	int CurPage;

13	//当前页面从Page查询参数获取

14	if (Request.QueryString["Page"] != null)

15	CurPage=Convert.ToInt32(Request.QueryString["Page"]);

16

else

17	CurPage=1;

18	objPds.CurrentPageIndex = CurPage-1;

19	lblCurrentPage.Text = "Page: " + CurPage.ToString();

20	if (!objPds.IsFirstPage)

21	lnkPrev.NavigateUrl=Request.CurrentExecutionFilePath + "?Page=" + Convert.ToString(CurPage-1);

22	if (!objPds.IsLastPage)

23	lnkNext.NavigateUrl=Request.CurrentExecutionFilePath+ "?Page=" + Convert.ToString(CurPage+1);

24	//把PagedDataSource 对象赋给Repeater控件

25	Repeater1.DataSource=objPds;

26	Repeater1.DataBind();

27

}

这样就可以很简单的实现DataList和Repeater控件的分页显示。但这样做有个缺点，就是每次都要把所有页的数据Select出来，DataGrid也是这样，这样会降低一点效率（大多时候体会不出来差别）；如果使用第一种方法就可以只Select出当前页的数据。

Asp.net提供了三个功能强大的列表控件：DataGrid、DataList和Repeater控件，但其中只有DataGrid控件提供分页功能。相对DataGrid，DataList和Repeater控件具有更高的样式自定义性，所以很多时候我们喜欢使用DataList或Repeater控件来显示数据。

PagedDataSource 类封装 DataGrid 控件的属性，这些属性使 DataGrid 可以执行分页。
PagedDataSource 类的部分公共属性：

AllowCustomPaging获取或设置指示是否启用自定义分页的值。
AllowPaging 获取或设置指示是否启用分页的值。
Count 获取要从数据源使用的项数。
CurrentPageIndex 获取或设置当前页的索引。
DataSource 获取或设置数据源。
DataSourceCount 获取数据源中的项数。
FirstIndexInPage 获取页中的第一个索引。
IsCustomPagingEnabled获取一个值，该值指示是否启用自定义分页。
IsFirstPage 获取一个值，该值指示当前页是否是首页。
IsLastPage 获取一个值，该值指示当前页是否是最后一页。
IsPagingEnabled 获取一个值，该值指示是否启用分页。
IsReadOnly 获取一个值，该值指示数据源是否是只读的。
IsSynchronized 获取一个值，该值指示是否同步对数据源的访问（线程安全）。
PageCount 获取显示数据源中的所有项所需要的总页数。
PageSize 获取或设置要在单页上显示的项数。
VirtualCount 获取或设置在使用自定义分页时数据源中的实际项数。

DataGrid控件就是使用PagedDataSource类来实现数据分页显示的，所以DataList和Repeater也同样可以使用PagedDataSource来显示分页。

VB.NET CODE

view source

print ?

01	Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

02	'在這裡放置使用者程式碼以初始化網頁

03	If Not IsPostBack Then

04	pds.DataSource = Me.CreateDataSource

05	pds.AllowPaging = True

06	pds.PageSize = 4

07	intTotalRec = Me.CreateDataSource.Count

08	pds.CurrentPageIndex = 0

09	'Response.Write(" ")

10	intTotalPage = pds.PageCount.ToString

11	Me.DataList1.DataSource = pds

12	Me.DataList1.DataBind()

13	Me.showinfo()

14	'Session("pc") = "1"

15

Else

16	'含有Session的注釋代碼表示在頁面驅動了一個事件後

17	'會先執行page_load事件然後執行所對應的的事件.

18	'Session("pc") = Session("pc") + "2"

19	'Response.Write(" ")

20	pds.DataSource = Me.CreateDataSource

21	pds.AllowPaging = True

22	pds.PageSize = 4

23	intTotalRec = Me.CreateDataSource.Count

24	'Response.Write(" ")

25	intTotalPage = pds.PageCount.ToString

26

End If

27

End Sub

28

29	Public Function CreateDataSource() As DataView

30	Dim dt As DataTable

31	Dim dr As DataRow

32

33	dt = New DataTable

34	dt.Columns.Add("Integer", GetType(Integer))

35	dt.Columns.Add("String", GetType(String))

36

37	Dim i As Integer

38	For i = 0 To 5

39	dr = dt.NewRow

40	dr.Item(0) = i

41	dr.Item(1) = "item " & i.ToString

42	dt.Rows.Add(dr)

43

Next

44

45	CreateDataSource = dt.DefaultView

46	End Function

47

48	Private Sub lbFirst_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lbFirst.Click

49	'Session("pc") = Session("pc") + "3"

50	'Response.Write(" ")

51

52	pds.CurrentPageIndex = 0

53	Me.DataList1.DataSource = pds

54	Me.DataList1.DataBind()

55	Me.showinfo()

56

End Sub

57

58	Private Sub lbLast_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lbLast.Click

59	pds.CurrentPageIndex = Me.intTotalPage - 1

60	Me.DataList1.DataSource = pds

61	Me.DataList1.DataBind()

62	Me.showinfo()

63

End Sub

64

65	Private Sub lbPrevious_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lbPrevious.Click

66	If pds.CurrentPageIndex = 0 Then

67

Else

68	pds.CurrentPageIndex -= 1

69

End If

70	Me.DataList1.DataSource = pds

71	Me.DataList1.DataBind()

72	Me.showinfo()

73

End Sub

74

75	Private Sub lbNext_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lbNext.Click

76	If pds.CurrentPageIndex = pds.PageCount - 1 Then

77

Else

78	pds.CurrentPageIndex += 1

79

End If

80	Me.DataList1.DataSource = pds

81	Me.DataList1.DataBind()

82	Me.showinfo()

83

End Sub

84

85	Private Sub showinfo()

86	Me.lInfo.Text = (pds.CurrentPageIndex + 1).ToString & "/" & Me.intTotalPage.ToString

87

End Sub

Note:

需要給PagedDataSource賦一個數據源，同時還要設定允許分頁(AllowPaging)、每頁的大小(PageSize)，這樣PagedDataSource對象就可以自動算出頁數(PageCount)，然後就可以把這個PagedDataSource作為數據源賦於一個DataList對象，最後將DataList對象綁定。