ASP.Net/ADO.net Database/DataGrid Page

Материал из .Net Framework эксперт
Перейти к: навигация, поиск

asp:datagrid page index

   <source lang="csharp">

<%@ Page Language=VB Debug=true %> <%@ Import Namespace="System.Data" %> <%@ Import Namespace="System.Data.OLEDB" %> <script runat=server> Sub Page_Load(ByVal Sender as Object, ByVal E as EventArgs) 

   If Not IsPostBack Then
       Dim DSPageData As New DataSet
       Dim DBConn as OleDbConnection
       Dim DBCommand As OleDbDataAdapter
       DBConn = New OleDbConnection( _
           "PROVIDER=Microsoft.Jet.OLEDB.4.0;" _
           & "DATA SOURCE=" _
           & Server.MapPath("EmployeeDatabase.mdb;"))
       DBCommand = New OleDbDataAdapter _
           ("Select * " _
           & "From Employee " _
           & "Order By LastName, FirstName", DBConn)
       DBCommand.Fill(DSPageData, _
           "Employee")
       dgEmps.DataSource = _
           DSPageData.Tables("Employee").DefaultView
       dgEmps.DataBind()
   End If

End Sub Sub Page_Change(sender As Object, e As DataGridPageChangedEventArgs) 

   dgEmps.CurrentPageIndex = e.NewPageIndex
   Dim DSPageData As New DataSet
   Dim DBConn as OleDbConnection
   Dim DBCommand As OleDbDataAdapter
   DBConn = New OleDbConnection( _
       "PROVIDER=Microsoft.Jet.OLEDB.4.0;" _
       & "DATA SOURCE=" _
       & Server.MapPath("EmployeeDatabase.mdb;"))
   DBCommand = New OleDbDataAdapter _
       ("Select * " _
       & "From Employee " _
       & "Order By LastName, FirstName", DBConn)
   DBCommand.Fill(DSPageData, _
       "Employee")
   dgEmps.DataSource = _
       DSPageData.Tables("Employee").DefaultView
   dgEmps.DataBind()

End Sub </SCRIPT> <HTML> <HEAD> <TITLE>Displaying Pages of Data through a DataGrid Control</TITLE> </HEAD> <Body LEFTMARGIN="40"> <form runat="server">

<asp:datagrid 

   id="dgEmps" 
   pagerstyle-backcolor="White"
   pagerstyle-forecolor="DarkGreen"
   pagerstyle-font-bold="True"
   allowpaging="True"
   pagesize=3
   onpageindexchanged="Page_Change"
   autogeneratecolumns="true"
   runat="server"

> </asp:datagrid> </form> </BODY> </HTML> 

      </source>

<A href="http://www.nfex.ru/Code/ASPDownload/EmployeeDatabase.zip">EmployeeDatabase.zip( 10 k)</a>

Источник — «http://nfex.ru/index.php?title=ASP.Net/ADO.net_Database/DataGrid_Page&oldid=1621»