当前位置: 首页 > 图文教程 > 网络编程 > ASP.NET > 一个功能齐全的DataGrid分页例子

ASP.NET
利用ASP.NET和AJAX解决手工拼接HTML问题
Asp.net关于动态输出服务器控件的应用
技巧/诀窍：在ASP.NET中重写URL
ASP.NET 自定义控件从入门到精通3
以Post方式向网页发送数据
ASP.NET实现数据采集
使用ASP.NET Image Generation生成图片缩略图及水印
ASP.NET安全问题--ASP.NET安全架构
反思软件系统与软件系统之间的集成交互问题
.Net实现程序的插件机制
作为ASP.NET开发人员必须养成的编程习惯
总结了一下ADO.NET数据库连接的相关知识
VB.NET中有用的通用对象列表
HTTP Error 503与.NET 3.5 SP1 X64
ASP.NET创建Web服务之使用事务
ASP.NET中基类Page_Load方法后执行原因分析
ASP.NET中让网页弹出窗口不再困难
改变.net网站的默认解决方案位置
.net垃圾回收和CLR 4.0对垃圾回收所做的改进之二
.net垃圾回收和CLR 4.0对垃圾回收所做的改进之一

No. « 27 28 29 30 »

技术文章搜索

关键字

ASP.NET 中的 一个功能齐全的DataGrid分页例子

出处:互联网   整理: 软晨网（RuanChen.com）   发布: 2009-08-14   浏览: 135 ::
收藏到网摘: n/a

 

以下为引用的内容：

C#版本

DataGridPaging.aspx

<%@ Page language="c#" EnableViewState = "true" Codebehind="DataGridPaging.aspx.cs"
AutoEventWireup="false" Inherits="eMeng.Exam.DataGridPaging.DataGridPaging" %>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<meta content="Visual Basic 7.0" name="CODE_LANGUAGE">
<meta content="JavaScript" name="vs_defaultClientScript">
<meta content="http://schemas.microsoft.com/intellisense/ie5" name="vs_targetSchema">
</HEAD>
<body MS_POSITIONING="GridLayout">
<form id="Form1" runat="server">
<asp:datagrid id="MyDataGrid" runat="server" AutoGenerateColumns="False"
HorizontalAlign="Center" AlternatingItemStyle-BackColor="#eeeeee"
HeaderStyle-BackColor="#aaaadd" Font-Size="8pt" Font-Name="Verdana"
CellSpacing="0" CellPadding="3" GridLines="Both" BorderWidth="1"
BorderColor="black" OnPageIndexChanged="MyDataGrid_Page" PagerStyle-HorizontalAlign="Right"
PagerStyle-Mode="NumericPages" PageSize="5" AllowPaging="True">
　<AlternatingItemStyle BackColor="#EEEEEE"></AlternatingItemStyle>
　<HeaderStyle BackColor="#AAAADD" Font-Bold="True" HorizontalAlign="Center"></HeaderStyle>
　<PagerStyle HorizontalAlign="Right" Mode="NumericPages"></PagerStyle>
　<Columns>
　<asp:BoundColumn HeaderText="标题" DataField="Title" HeaderStyle-Width="480px">
　</asp:BoundColumn>
　<asp:BoundColumn HeaderText="发表日期" DataField="CreateDate" DataFormatString="{0:yyyy-MM-dd hh:mm:ss}">
　</asp:BoundColumn>
　</Columns>
</asp:datagrid>
<p style="FONT-SIZE:9pt" align="center">
　<asp:label id="lblPageCount" runat="server"></asp:label>&nbsp;
　<asp:label id="lblCurrentIndex" runat="server"></asp:label>
　<asp:linkbutton id="btnFirst" onclick="PagerButtonClick" runat="server" Font-Name="verdana"
　 Font-size="8pt" ForeColor="navy" CommandArgument="0"></asp:linkbutton>&nbsp;
　<asp:linkbutton id="btnPrev" onclick="PagerButtonClick" runat="server" Font-Name="verdana"
　 Font-size="8pt" ForeColor="navy" CommandArgument="prev"></asp:linkbutton>&nbsp;
　<asp:linkbutton id="btnNext" onclick="PagerButtonClick" runat="server" Font-Name="verdana"
　 Font-size="8pt" ForeColor="navy" CommandArgument="next"></asp:linkbutton>&nbsp;
　<asp:linkbutton id="btnLast" onclick="PagerButtonClick" runat="server" Font-Name="verdana"
　 Font-size="8pt" ForeColor="navy" CommandArgument="last"></asp:linkbutton>
</p>
</form>
</body>
</HTML>

DataGridPaging.aspx.cs

using System;
using System.Collections;
using System.ComponentModel;
using System.Data;
using System.Data.OleDb;
using System.Drawing;
using System.Web;
using System.Web.SessionState;
using System.Web.UI;
using System.Web.UI.WebControls;
using System.Web.UI.HtmlControls;

namespace eMeng.Exam.DataGridPaging
{
/// <summary>
/// DataGridPaging 的摘要说明。
/// </summary>
public class DataGridPaging : System.Web.UI.Page
{
protected System.Web.UI.WebControls.DataGrid MyDataGrid;
protected System.Web.UI.WebControls.Label lblPageCount;
protected System.Web.UI.WebControls.Label lblCurrentIndex;
protected System.Web.UI.WebControls.LinkButton btnFirst;
protected System.Web.UI.WebControls.LinkButton btnPrev;
protected System.Web.UI.WebControls.LinkButton btnNext;
protected System.Web.UI.WebControls.LinkButton btnLast;
private OleDbConnection cn = new OleDbConnection();

private void Page_Load(object sender, System.EventArgs e)
{
　// 在此处放置用户代码以初始化页面
　btnFirst.Text = "最首页";
　btnPrev.Text = "前一页";
　btnNext.Text = "下一页";
　btnLast.Text = "最后页";
　OpenDatabase();
　BindGrid();
}
private void OpenDatabase()
{
cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + Server.MapPath("xxxx.mdb");
cn.Open();
}
private void ShowStats()
{
lblCurrentIndex.Text = "第 " + (MyDataGrid.CurrentPageIndex + 1).ToString() + " 页";
lblPageCount.Text = "总共 " + MyDataGrid.PageCount.ToString() + " 页";
}

public void PagerButtonClick(object sender, EventArgs e)
{
string arg = ((LinkButton)sender).CommandArgument.ToString();
switch(arg)
{
　case "next":
　 if (MyDataGrid.CurrentPageIndex < (MyDataGrid.PageCount - 1))
　 {
　　MyDataGrid.CurrentPageIndex += 1;
　 }
　 break;
　case "prev":
　 if (MyDataGrid.CurrentPageIndex > 0)
　 {
　　MyDataGrid.CurrentPageIndex -= 1;
　 }
　 break;
　case "last":
　 MyDataGrid.CurrentPageIndex = (MyDataGrid.PageCount - 1);
　 break;
　default:
　 MyDataGrid.CurrentPageIndex = System.Convert.ToInt32(arg);
　 break;
}
BindGrid();
ShowStats();
}
public void BindGrid()
{
OleDbConnection myConnection = cn;
DataSet ds　= new DataSet();
OleDbDataAdapter adapter　= new OleDbDataAdapter("Select Title,CreateDate from Document", myConnection);
adapter.Fill(ds, "Document");
MyDataGrid.DataSource = ds.Tables["Document"].DefaultView;
MyDataGrid.DataBind();
ShowStats();
}
public void MyDataGrid_Page(object sender, DataGridPageChangedEventArgs e)
{
int startIndex ;
startIndex = MyDataGrid.CurrentPageIndex * MyDataGrid.PageSize;
MyDataGrid.CurrentPageIndex = e.NewPageIndex;
BindGrid();
ShowStats();
}

#region Web Form Designer generated code
override protected void OnInit(EventArgs e)
{
//
// CODEGEN：该调用是 ASP.NET Web 窗体设计器所必需的。
//
InitializeComponent();
base.OnInit(e);
}

/// <summary>
/// 设计器支持所需的方法 - 不要使用代码编辑器修改
/// 此方法的内容。
/// </summary>
private void InitializeComponent()
{
this.Load += new System.EventHandler(this.Page_Load);

}
#endregion
}
}


VB.NET版本

DataGridPaging.aspx

<%@ Page Language="vb" AutoEventWireup="false" Codebehind="DataGridPaging.aspx.vb" Inherits="DataGridPaging"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
　<HEAD>
　　<meta content="Visual Basic 7.0" name="CODE_LANGUAGE">
　　<meta content="JavaScript" name="vs_defaultClientScript">
　　<meta content="http://schemas.microsoft.com/intellisense/ie5" name="vs_targetSchema">
　</HEAD>
　<body MS_POSITIONING="GridLayout">
　　<form id="Form1" runat="server">
　　　<asp:datagrid id="MyDataGrid" runat="server" AlternatingItemStyle-BackColor="#eeeeee"
　　HeaderStyle-BackColor="#aaaadd" Font-Size="8pt" Font-Name="Verdana" CellSpacing="0"
　　 CellPadding="3" GridLines="Both" BorderWidth="1" BorderColor="black"
　 OnPageIndexChanged="MyDataGrid_Page" PagerStyle-HorizontalAlign="Right"
　　PagerStyle-Mode="NumericPages" PageSize="5" AllowPaging="True">
　　　　<AlternatingItemStyle BackColor="#EEEEEE"></AlternatingItemStyle>
　　　　<HeaderStyle BackColor="#AAAADD"></HeaderStyle>
　　　　<PagerStyle HorizontalAlign="Right" Mode="NumericPages"></PagerStyle>
　　　</asp:datagrid>
　　　<p style="font-size:9pt">
　　　　<asp:label id="lblPageCount" runat="server"></asp:label>&nbsp;
　　　　<asp:label id="lblCurrentIndex" runat="server"></asp:label>
　　　　<asp:linkbutton id="btnFirst" onclick="PagerButtonClick" runat="server"
　 Font-Name="verdana" Font-size="8pt" ForeColor="navy" CommandArgument="0">
　 </asp:linkbutton>&nbsp;
　　　　<asp:linkbutton id="btnPrev" onclick="PagerButtonClick" runat="server"
　 Font-Name="verdana" Font-size="8pt" ForeColor="navy" CommandArgument="prev">
　 </asp:linkbutton>&nbsp;
　　　　<asp:linkbutton id="btnNext" onclick="PagerButtonClick" runat="server"
　 Font-Name="verdana" Font-size="8pt" ForeColor="navy" CommandArgument="next">
　 </asp:linkbutton>&nbsp;
　　　　<asp:linkbutton id="btnLast" onclick="PagerButtonClick" runat="server"
　 Font-Name="verdana" Font-size="8pt" ForeColor="navy" CommandArgument="last">
　 </asp:linkbutton>
　　　</p>
　　</form>
　</body>
</HTML>

DataGridPaging.aspx.vb

Imports System.Data.SqlClient
Imports System.Data
Imports System.Web.UI

Public Class DataGridPaging
　Inherits System.Web.UI.Page

　Protected WithEvents MyDataGrid As System.Web.UI.WebControls.DataGrid
　Protected WithEvents btnFirst As System.Web.UI.WebControls.LinkButton
　Protected WithEvents btnPrev As System.Web.UI.WebControls.LinkButton
　Protected WithEvents btnNext As System.Web.UI.WebControls.LinkButton
　Protected WithEvents btnLast As System.Web.UI.WebControls.LinkButton
　Protected WithEvents lblCurrentIndex As System.Web.UI.WebControls.Label
　Protected WithEvents lblPageCount As System.Web.UI.WebControls.Label
　Protected WithEvents DataGrid1 As System.Web.UI.WebControls.DataGrid

#Region " Web Form Designer Generated Code "

　'This call is required by the Web Form Designer.
　<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()

　End Sub

　Private Sub Page_Init(ByVal sender As System.Object,_
　 ByVal e As System.EventArgs) Handles MyBase.Init
　　'CODEGEN: This method call is required by the Web Form Designer
　　'Do not modify it using the code editor.
　　InitializeComponent()
　End Sub

#End Region

　Private Sub Page_Load(ByVal sender As System.Object,_
　 ByVal e As System.EventArgs) Handles MyBase.Load
　　btnFirst.Text = "最首页"
　　btnPrev.Text = "前一页"
　　btnNext.Text = "下一页"
　　btnLast.Text = "最后页"
　　OpenDatabase()
　　BindGrid()
　End Sub


　Sub MyDataGrid_Page(ByVal sender As Object, ByVal e As DataGridPageChangedEventArgs)
　　Dim startIndex As Integer
　　startIndex = MyDataGrid.CurrentPageIndex * MyDataGrid.PageSize
　　MyDataGrid.CurrentPageIndex = e.NewPageIndex
　　BindGrid()
　　ShowStats()
　End Sub

　Sub BindGrid()
　　Dim myConnection As SqlConnection = cn
　　Dim ds As DataSet = New DataSet()
　　Dim adapter As SqlDataAdapter = New SqlDataAdapter("Select * from Orders", myConnection)
　　adapter.Fill(ds, "Orders")
　　MyDataGrid.DataSource = ds.Tables("Orders").DefaultView
　　MyDataGrid.DataBind()
　　ShowStats()

　End Sub

　Sub PagerButtonClick(ByVal sender As Object, ByVal e As EventArgs)
　　'used by external paging UI
　　Dim arg As String = sender.CommandArgument

　　Select Case arg
　　　Case "next"
　　　　If (MyDataGrid.CurrentPageIndex < (MyDataGrid.PageCount - 1)) Then
　　　　　MyDataGrid.CurrentPageIndex += 1
　　　　End If
　　　Case "prev"
　　　　If (MyDataGrid.CurrentPageIndex > 0) Then
　　　　　MyDataGrid.CurrentPageIndex -= 1
　　　　End If
　　　Case "last"
　　　　MyDataGrid.CurrentPageIndex = (MyDataGrid.PageCount - 1)
　　　Case Else
　　　　'page number
　　　　MyDataGrid.CurrentPageIndex = System.Convert.ToInt32(arg)
　　End Select
　　BindGrid()
　　ShowStats()
　End Sub

　Sub ShowStats()
　　lblCurrentIndex.Text = "第 " + (MyDataGrid.CurrentPageIndex + 1).ToString() + " 页"
　　lblPageCount.Text = "总共 " + MyDataGrid.PageCount.ToString() + " 页"
　End Sub

Public cn As New SqlClient.SqlConnection()
　Public Sub OpenDatabase()
　　cn.ConnectionString = "Server=.;Database=NorthWind;User Id=sa;Password=;"
　　cn.Open()
　End Sub
End Class