Asp Control ASP.Net

  1. Home
  2. ASP.Net
  3. Asp Control
  4. Add navigator to asp
<%@ Page Language=VB Debug=true %>
<%@ Import Namespace="System.Data" %>

Private MyDT As New DataTable
Sub Page_Load(ByVal Sender as Object, ByVal E as EventArgs)
    Dim MyRow As DataRow
    MyDT.Columns.Add(New DataColumn("EmployeeID", _
        GetType(Int32)))
    MyDT.Columns.Add(New DataColumn("EmployeeFirstName", _
        GetType(String)))
    MyDT.Columns.Add(New DataColumn("EmployeeLastName", _
        GetType(String)))
    MyDT.Columns.Add(New DataColumn("BirthDate", _
        GetType(Date)))
    MyDT.Columns.Add(New DataColumn("Salary", _
        GetType(Single)))
    MyRow = MyDT.NewRow()
    MyRow(0) = 1
    MyRow(1) = "Bob"
    MyRow(2) = "Miller"
    MyRow(3) = "5/15/65"
    MyRow(4) = "40000"
    MyDT.Rows.Add(MyRow)
    MyRow = MyDT.NewRow()
    MyRow(0) = 2
    MyRow(1) = "Jenny"
    MyRow(2) = "Fry"
    MyRow(3) = "7/22/75"
    MyRow(4) = "73050"
    MyDT.Rows.Add(MyRow)
    MyRow = MyDT.NewRow()
    MyRow(0) = 3
    MyRow(1) = "Lisa"
    MyRow(2) = "Smith"
    MyRow(3) = "12/8/71"
    MyRow(4) = "62500"
    MyDT.Rows.Add(MyRow)
    MyRow = MyDT.NewRow()
    MyRow(0) = 4
    MyRow(1) = "Stephanie"
    MyRow(2) = "Myer"
    MyRow(3) = "3/15/54"
    MyRow(4) = "43222"
    MyDT.Rows.Add(MyRow)
    MyRow = MyDT.NewRow()
    MyRow(0) = 5
    MyRow(1) = "Jimmy"
    MyRow(2) = "Parker"
    MyRow(3) = "3/12/47"
    MyRow(4) = "52825"
    MyDT.Rows.Add(MyRow)
    dg1.DataSource = MyDT
    dg1.DataBind()
End Sub
Sub Page_Change(sender As Object, e As DataGridPageChangedEventArgs)
    dg1.CurrentPageIndex = e.NewPageIndex
    dg1.DataSource = MyDT
    dg1.DataBind()
End Sub



DataGrid 5 Control Sample Page




    id="lblMessage"
    runat="server"
/>


    id="dg1" 
    runat="server"
    Width="90%"
    BorderColor="black"
    CellPadding=3 
    CellSpacing="0"
    Font-Name="Trebuchet MS"
    Font-Size="10pt"
    ForeColor="Black"
    BackColor="Beige" 
    AlternatingItemStyle-ForeColor="Cornsilk"
    AlternatingItemStyle-BackColor="DarkBlue"
    AlternatingItemStyle-Font-Name="Arial"
    AlternatingItemStyle-Font-Italic="True"
    HeaderStyle-BackColor="Burlywood"
    HeaderStyle-Font-Bold="True"
    AutoGenerateColumns="False"
    PagerStyle-BackColor="White"
    PagerStyle-ForeColor="DarkGreen"
    PagerStyle-Font-Bold="True"
    AllowPaging="True"
    PageSize=2
    OnPageIndexChanged="Page_Change"
>
    
                    HeaderText="Employee ID"
            DataField="EmployeeID"
        />
                    HeaderText="Last Name" 
            DataField="EmployeeLastName"
        />
                    HeaderText="First Name" 
            DataField="EmployeeFirstName"
        />
                    HeaderText="Salary"
            DataField="Salary"
            DataFormatString="{0:C}"
        />
                    HeaderText="Birth Date"
            DataField="BirthDate"
            DataFormatString="{0:d}"
        />