Hello guys i made a Datagrid with Editing,Update and Cancel using VS.NET. to
my surprise nothing is on the screen after compilation ..
By code below:-
Imports System.Data
Imports System.Data.Sql Client
Imports System.Web.UI.W ebControls
Imports System.Web.UI.H tmlControls
Public Class datagrid_edit
Inherits System.Web.UI.P age
Protected WithEvents MenuGrid As System.Web.UI.W ebControls.Data Grid
#Region " Web Form Designer Generated Code "
'This call is required by the Web Form Designer.
<System.Diagnos tics.DebuggerSt epThrough()> Private Sub
InitializeCompo nent()
End Sub
'NOTE: The following placeholder declaration is required by the Web Form
Designer.
'Do not delete or move it.
Private designerPlaceho lderDeclaration As System.Object
Private Sub Page_Init(ByVal sender As System.Object, ByVal e As
System.EventArg s) Handles MyBase.Init
'CODEGEN: This method call is required by the Web Form Designer
'Do not modify it using the code editor.
InitializeCompo nent()
End Sub
#End Region
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
End Sub
Sub BindDataGrid()
Dim DBConnection As SqlConnection
Dim DBCommand As SqlCommand
Dim DBReader As SqlDataReader
Dim SQLString As String
DBConnection = New
SqlConnection(" server=(local); database=Northw ind;integrated security=true;" )
DBConnection.Op en()
SQLString = "SELECT * FROM treetable ORDER BY FileCategoryID"
DBCommand = New SqlCommand(SQLS tring, DBConnection)
DBReader = DBCommand.Execu teReader()
MenuGrid.DataSo urce = DBReader
MenuGrid.DataBi nd()
DBReader.Close( )
DBConnection.Cl ose()
End Sub
Sub EditRecord(ByVa l Src As Object, ByVal Args As
DataGridCommand EventArgs)
MenuGrid.EditIt emIndex = Args.Item.ItemI ndex
BindDataGrid()
End Sub
Sub UpdateRecord(By Val Src As Object, ByVal Args As
DataGridCommand EventArgs)
Dim DBConnection As SqlConnection
Dim DBCommand As SqlCommand
Dim DBReader As SqlDataReader
Dim SQLString As String
Dim FileCategoryID = CType(Args.Item .Cells(0).Contr ols(0),
TextBox).Text
Dim ParentID = CType(Args.Item .Cells(1).Contr ols(0), TextBox).Text
Dim FileCategory = CType(Args.Item .Cells(2).Contr ols(0), TextBox).Text
Dim NavigateUrl = CType(Args.Item .Cells(3).Contr ols(0), TextBox).Text
Dim Target = CType(Args.Item .Cells(4).Contr ols(0), TextBox).Text
'Dim ItemPrice = CType(Args.Item .Cells(4).Contr ols(0), TextBox).Text
'Dim ItemQuantity = CType(Args.Item .Cells(5).Contr ols(0),
TextBox).Text
SQLString = "UPDATE treetable SET " & _
"ParentID = '" & ParentID & "', " & _
"FileCatego ry = '" & Replace(FileCat egory, "'", "''") & "', " & _
"NacigateUr l = '" & Replace(Navigat eUrl, "'", "''") & "', " & _
"Target = " & Target & ", " & _
"WHERE FileCategoryID ='" & FileCategoryID & "'"
'"ItemQuanti ty = " & ItemQuantity & " " & _
'"WHERE ItemNumber = '" & ItemNumber & "'"
DBConnection = New
SqlConnection(" server=(local); database=Northw ind;integrated security=true;" )
DBConnection.Op en()
DBCommand = New SqlCommand(SQLS tring, DBConnection)
DBCommand.Execu teNonQuery()
DBConnection.Cl ose()
MenuGrid.EditIt emIndex = -1
BindDataGrid()
End Sub
Sub CancelRecord(By Val Src As Object, ByVal Args As
DataGridCommand EventArgs)
MenuGrid.EditIt emIndex = -1
BindDataGrid()
End Sub
End Class
Html Code Below:-
-------------------
<asp:DataGrid id="MenuGrid" runat="server"
OnEditCommand=" EditRecord"
OnUpdateCommand ="UpdateReco rd"
OnCancelCommand ="CancelReco rd"
AutoGenerateCol umns="False">
<Columns>
<asp:BoundColum n
HeaderText="Par entID"
DataField="Pare ntID"/>
<asp:BoundColum n
HeaderText="Fil eCategory"
DataField="File Category"/>
<asp:BoundColum n
HeaderText="Nav igateUrl"
DataField="Navi gateUrl"/>
<asp:BoundColum n
HeaderText="tar get"
DataField="targ et"/>
<asp:EditComman dColumn
HeaderText="Edi ting"
EditText="Edit"
UpdateText="Upd ate"
CancelText="Can cel"/>
</Columns>
</asp:DataGrid>
