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

ASP.NET
为T-SQL添加intellisense功能
SQL Server 2005安装过程中出现错误的解决办法
SQL Server 2005 RTM 安装错误 :The SQL Server System Configuration Checker cannot be executed due to
有关于JSON的一些资料
不能忽略c#中的using和as操作符的用处
JavaScript系列之―同步还是异步?
获取远程网页的内容之一(downmoon原创)
获取远程网页的内容之二(downmoon原创)
ASP.Net中防止刷新自动触发事件的解决方案
asp.net下用js实现鼠标移至小图,自动显示相应大图
Asp.Net 和 AJAX.Net 的区别
提交页面的定位--scrollIntoView的用法
利用AJAX与数据岛实现无刷新绑定
asp.net下判断用户什么时候离开,以什么方式离开
DataSet 添加数据集、行、列、主键和外键等操作示例
读写xml所有节点个人小结 和 读取xml节点的数据总结
收藏的asp.net文件上传类源码
asp.net下GDI+的一些常用应用(水印,文字,圆角处理)技巧
一个可以让.net程序在非WIN平台上运行的软件Mono
使用ASP.NET 2.0 CSS 控件适配器生成CSS友好的HTML输出

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


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-08-14   浏览: 154 ::
收藏到网摘: 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