六月婷婷综合激情-六月婷婷综合-六月婷婷在线观看-六月婷婷在线-亚洲黄色在线网站-亚洲黄色在线观看网站

明輝手游網中心：是一個免費提供流行視頻軟件教程、在線學習分享的學習平臺！

一個技巧齊全的DataGrid分頁例子

發表時間：2024-05-20 來源：明輝站整理相關軟件相關文章人氣：

[摘要]C#版本DataGridPaging.aspx<%@ Page language="c#" EnableViewState = "true" Codebehind="DataGridPaging.aspx.cs" AutoEvent...

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
主站蜘蛛池模板： 日韩 欧美 亚洲 中文字幕 | 一级做a爰片性色毛片视频图片 | 色综合久久88色综合天天 | 午夜国产精品久久久久 | 亚洲婷婷综合网 | 伊香蕉大综综综合久久 | 亚洲欧美日韩精品久久 | 亚洲青草视频 | 欧美视频在线播放观看免费福利资源 | 天天干天天操天天爱 | 青草社区在线 | 日本aa网站 | 在线播放亚洲视频 | 日韩欧美伊人久久大香线蕉 | 午夜在线免费观看视频 | 天天草比 | 四虎精品影院在线观看视频 | 一区二区三区视频在线播放 | 欧洲亚洲视频 | 亚洲欧美在线精品一区二区 | 亚洲国产日韩欧美在线a乱码 | 欧美一级黄色大片 | 先锋影音va中文资源 | 色婷婷六月 | 自拍偷拍1| 亚洲视频免费观看 | 日韩一卡 二卡 三卡 四卡 免费视频 | 亚洲国产日韩欧美在线a乱码 | 一级黄色片在线播放 | 四虎影视在线影院4hu | 日韩在线观看一区二区三区 | 日韩一级在线视频 | 四虎永久在线观看 | 午夜精品久久久久久久2023 | 亚洲色视频在线播放网站 | 日韩a级片| 欧美综合在线播放 | 亚洲精品另类 | 亚洲精品综合 | 特级欧美老少乱配 | 日韩成人免费在线视频 |