Hi!
I have created a sample datagrid that can update data on a database. Please
help me solve the problem, I have attached both aspx and code behind
(aspx.vb):
_______________ _______
datagrid.aspx
<%@ Page Language="vb" AutoEventWireup ="false" Codebehind="Dat aGrid.aspx.vb"
Inherits="vs_23 10.DataGrid"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<title>DataGrid </title>
<meta name="GENERATOR " content="Micros oft Visual Studio .NET 7.1">
<meta name="CODE_LANG UAGE" content="Visual Basic .NET 7.1">
<meta name="vs_defaul tClientScript" content="JavaSc ript">
<meta name="vs_target Schema"
content="http://schemas.microso ft.com/intellisense/ie5">
</HEAD>
<body MS_POSITIONING= "GridLayout ">
<form id="Form1" method="post" runat="server">
<asp:DataGrid id=DataGrid1 style="Z-INDEX: 101; LEFT: 51px; POSITION:
absolute; TOP: 51px" runat="server" DataSource="<%# DataSet21 %>"
DataKeyField="N ounID" BorderColor="#C C9966" BorderStyle="No ne"
BorderWidth="1p x" BackColor="Whit e" CellPadding="4" Font-Size="10pt"
AutoGenerateCol umns="False" Font-Names="Arial" AllowPaging="Tr ue">
<SelectedItemSt yle Font-Bold="True" ForeColor="#663 399"
BackColor="#FFC C66"></SelectedItemSty le>
<ItemStyle ForeColor="#330 099" BackColor="Whit e"></ItemStyle>
<HeaderStyle Font-Bold="True" ForeColor="#FFF FCC"
BackColor="#990 000"></HeaderStyle>
<FooterStyle ForeColor="#330 099" BackColor="#FFF FCC"></FooterStyle>
<Columns>
<asp:BoundColum n DataField="Noun ID" SortExpression= "NounID"
HeaderText="ID" ></asp:BoundColumn >
<asp:BoundColum n DataField="Noun Desc" SortExpression= "NounDesc"
HeaderText="Nou n"></asp:BoundColumn >
<asp:TemplateCo lumn HeaderText="Act ion">
<ItemTemplate >
<asp:LinkButt on runat="server" Text="Edit" CommandName="Ed it"
CausesValidatio n="false"></asp:LinkButton>
</ItemTemplate>
<EditItemTempla te>
<asp:LinkButt on runat="server" Text="Update"
CommandName="Up date"></asp:LinkButton>
<asp:LinkButt on runat="server" Text="Cancel" CommandName="Ca ncel"
CausesValidatio n="false"></asp:LinkButton>
</EditItemTemplat e>
</asp:TemplateCol umn>
</Columns>
<PagerStyle HorizontalAlign ="Center" ForeColor="#330 099"
BackColor="#FFF FCC"></PagerStyle>
</asp:DataGrid>
<asp:Label id="Label1" style="Z-INDEX: 102; LEFT: 51px; POSITION:
absolute; TOP: 17px" runat="server"> Label</asp:Label>
</form>
</body>
</HTML>
_______________ _________
datagrid.aspx.v b
Imports System.Data.Ole Db
Public Class DataGrid
Inherits System.Web.UI.P age
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As
System.EventArg s) Handles MyBase.Load
'Put user code to initialize the page here
OleDbDataAdapte r1.Fill(DataSet 21)
DataGrid1.DataB ind()
End Sub
Private Sub DataGrid1_EditC ommand(ByVal source As Object, ByVal e As
System.Web.UI.W ebControls.Data GridCommandEven tArgs) Handles
DataGrid1.EditC ommand
DataGrid1.EditI temIndex() = e.Item.ItemInde x
DataGrid1.DataB ind()
End Sub
Private Sub DataGrid1_Updat eCommand(ByVal source As Object, ByVal e As
System.Web.UI.W ebControls.Data GridCommandEven tArgs) Handles
DataGrid1.Updat eCommand
Dim NounTable As DataSet2.tbltsN ounDataTable
NounTable = DataSet21.tblts Noun
Dim rowToUpdate As DataSet2.tbltsN ounRow
rowToUpdate = NounTable.Rows( e.Item.ItemInde x)
rowToUpdate.Nou nDesc = CType(e.Item.Ce lls(1).Controls (0),
TextBox).Text
OleDbDataAdapte r1.Update(DataS et21)
Label1.Text = rowToUpdate.Nou nDesc
DataGrid1.EditI temIndex = -1
DataGrid1.DataB ind()
End Sub
Private Sub DataGrid1_PageI ndexChanged(ByV al source As Object, ByVal e
As System.Web.UI.W ebControls.Data GridPageChanged EventArgs) Handles
DataGrid1.PageI ndexChanged
DataGrid1.Curre ntPageIndex = e.NewPageIndex
DataGrid1.DataB ind()
End Sub
Private Sub DataGrid1_Cance lCommand(ByVal source As Object, ByVal e As
System.Web.UI.W ebControls.Data GridCommandEven tArgs) Handles
DataGrid1.Cance lCommand
DataGrid1.EditI temIndex = -1
DataGrid1.DataB ind()
End Sub
End Class
_______________ ____
