欢迎光临
我们一直在努力
当前位置：IDC资讯中心 > 网络编程 > ASP.NET教程 > 正文

一个功能齐全的datagrid分页例子_asp.net技巧

2007-08-23 分类：ASP.NET教程 阅读(864) 评论(0)
建站超值云服务器，限时71元/月

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

赞(0)
版权申明：本站文章部分自网络，如有侵权，请联系：west999com@outlook.com 特别注意：本站所有转载文章言论不代表本站观点！ 本站所提供的图片等素材，版权归原作者所有，如需使用，请与原作者联系。未经允许不得转载：IDC资讯中心 » 一个功能齐全的datagrid分页例子_asp.net技巧
分享到： 更多 (0)

相关推荐

热门标签

ldquo (1370)win (1324)活动 (1166)ios (1162)rdquo (818)微信 (747)iphone (728)小米 (722)windows (706)手机 (698)酷跑 (686)飞车 (540)天天 (492)qq (491)网站 (457)全民 (442)discuz (408)充值 (389)安装 (368)更新 (321)华为 (300)浏览器 (292)支付宝 (289)三星 (266)note (264)教程 (262)预览版 (261)小编 (258)越狱 (254)linux (248)

热门文章

分类目录