Mega Code Archive

 
Categories / ASP.Net Tutorial / ASP Net Controls
 

Asp

<%@ Import Namespace="System.Data" %> <%@ Import Namespace="System.Data.OleDb" %> <html> <script language="VB" runat="server">    sub Page_Load(Sender as Object, e as EventArgs)        dim myConnection as new OleDbConnection( _             "PROVIDER=Microsoft.Jet.OLEDB.4.0;" _             & "DATA SOURCE=" _             & Server.MapPath("EmployeeDatabase.mdb;"))       dim myCommand as new OleDbDataAdapter _          ("select * from employee", myConnection)       dim ds as DataSet = new DataSet()       myCommand.Fill(ds, "employee")       DataGrid1.DataSource = ds       DataGrid1.DataMember = "employee"       DataBind()    end sub        sub DataGrid1_Edit(Sender as Object, e as DataGridCommandEventArgs)       DataGrid1.EditItemIndex = e.Item.ItemIndex       DataGrid1.DataBind()    end sub    sub DataGrid1_Update(Sender as Object, e as DataGridCommandEventArgs)       DataGrid1.DataBind()    end sub    sub DataGrid1_Cancel(Sender as Object, e as DataGridCommandEventArgs)       DataGrid1.EditItemIndex = -1       DataGrid1.DataBind()    end sub        sub DataGrid1_SortCommand(Sender as Object, e as DataGridSortCommandEventArgs)       DataGrid1.DataBind()    End Sub    sub DataGrid1_PageIndexChanged(Sender as Object, e as DataGridPageChangedEventArgs)       DataGrid1.CurrentPageIndex = e.NewPageIndex       DataGrid1.DataBind()    end sub </script> <body>    <form runat="server">       <asp:DataGrid id="DataGrid1" runat="server"         BorderColor="black"         GridLines="Vertical"         cellpadding="4"         cellspacing="0"         width="450"         Font-NameFont-Names="Arial"         Font-Size="8pt"         ShowFooter="True"         HeaderStyle-BackColor="#cccc99"         FooterStyle-BackColor="#cccc99"         ItemStyle-BackColor="#ffffff"         AlternatingItemStyle-Backcolor="#cccccc"         AutoGenerateColumns="false"         AllowSorting=true         OnEditCommand="DataGrid1_Edit"         OnCancelCommand="DataGrid1_Cancel"         OnUpdateCommand="DataGrid1_Update"         AllowPaging="True"         PageSize=2         PagerStyle-Mode=NumericPages         PagerStyle-PageButtonCount = 2         OnPageIndexChanged="DataGrid1_PageIndexChanged" >            <Columns>                  <asp:TemplateColumn HeaderText="Name">                     <ItemTemplate>                           <asp:Label id="Name" runat="server"                                 Text='<%# Container.DataItem("FirstName")& _                                 " " & Container.DataItem("LastName") %>'/>                     </ItemTemplate>                </asp:TemplateColumn>                  <asp:BoundColumn HeaderText="ID" DataField="ID"/>                  <asp:EditCommandColumn                  EditText="Edit"                  CancelText="Cancel"                  UpdateText="Update"                  ItemStyle-Wrap="false"                  HeaderText="Edit" />         </Columns>   </asp:DataGrid>    </form>     </body> </html>