Repeater控件分页的例子
来源:互联网 发布:淘宝促销价怎么只能7折 编辑:程序博客网 时间:2024/05/01 21:54
<%@ Page Language="VB" %>
<%@ import namespace="System.Data" %>
<%@ import namespace="System.Data.OleDb" %>
<script language="VB" runat="server">
Public Sub Page_Load(ByVal src As Object, ByVal e As EventArgs)
Dim objConn As OleDbConnection = New OleDbConnection ("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" + Server.MapPath("../aspxWeb.mdb"))
Dim objCommand As OleDbDataAdapter = New OleDbDataAdapter ("select * from Document", objConn)
Dim ds As DataSet = New DataSet ()
objCommand.Fill(ds)
Dim objPds As PagedDataSource = New PagedDataSource ()
objPds.DataSource = ds.Tables(0).DefaultView
objPds.AllowPaging = True
objPds.PageSize = 5
Dim CurPage As Integer
If Not (Request.QueryString("Page") Is Nothing) Then
CurPage = Convert.ToInt32(Request.QueryString("Page"))
Else
CurPage = 1
End If
objPds.CurrentPageIndex = CurPage - 1
lblCurrentPage.Text = "当前页:" + CurPage.ToString()
If Not objPds.IsFirstPage Then
lnkPrev.NavigateUrl = Request.CurrentExecutionFilePath + "?Page=" + Convert.ToString(CurPage - 1)
End If
If Not objPds.IsLastPage Then
lnkNext.NavigateUrl = Request.CurrentExecutionFilePath + "?Page=" + Convert.ToString(CurPage + 1)
End If
Repeater1.DataSource = objPds
Repeater1.DataBind()
End Sub
</script>
<html>
<head>
<title>Repeater控件分页的例子</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style>
P,TD,DIV,SPAN {font-size:9pt}
</style>
</head>
<body>
<form name="form1" method="POST" runat="server">
<div style="padding:5px;background-color:#dedede">
<asp:label ID="lblCurrentPage" runat="server"></asp:label></td>
<td> <asp:HyperLink id="lnkPrev" runat="server">上一页</asp:HyperLink>
<asp:HyperLink id="lnkNext" runat="server">下一页</asp:HyperLink>
</div>
<hr size="1" color="#000099"/>
<asp:Repeater ID="Repeater1" runat="server">
<Itemtemplate>
<div style="padding:5px;background-color:#dedede">
<%# DataBinder.Eval(Container.DataItem, "Title") %>
</div>
</Itemtemplate>
</asp:Repeater>
</form>
</body>
</html>
- Repeater控件分页的例子
- Repeater控件分页的例子
- Repeater控件分页例子
- Repeater控件分页例子
- Repeater控件分页例子
- Repeater控件分页例子
- Repeater控件分页例子
- Repeater控件分页例子
- Repeater控件分页例子
- Repeater(DataList)控件分页例子
- Repeater 和分页的例子
- Repeater控件分页例子(ASP.NET 2.0)
- ASP.NET2.0Repeater控件分页例子
- ASP.NET 2.0 Repeater控件分页例子
- Repeater控件的分页问题
- repeater控件的分页技术--
- Repeater的抽象分页控件
- Repeater控件的分页实现
- 实现无刷新DropDownList联动效果。
- 04年6月9日关于咨询的讨论
- qmail+vpopmail+sqwebmail的安装
- ASP.NET虚拟空间都存在的安全漏洞
- 开发QQ小强智能聊天的基本原理
- Repeater控件分页的例子
- 装了.NET Framework 1.1 之后无法 build setup 项目
- 建立分布式的Qmail邮件系统
- SWOT分析
- redhat9.0下安装qmail+igenus过程实录
- asp常用函数
- Qmail安装及设定
- 我的亲朋好友
- 最近看了一部日剧--《白色巨塔》,感觉很不错,推荐给大家!