您的位置:首页 > 编程语言 > ASP

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

2010-06-22 10:19 901 查看
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
 
PagedDataSourceobjPds =
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對象綁定。
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
相关文章推荐