Private Sub DataGrid1_UpdateCommand(ByVal source As Object, _
       ByVal e As System.Web.UI.WebControls.DataGridCommandEventArgs) _
       Handles DataGrid1.UpdateCommand
   Dim dr As Dataset.BooksRow
   'Get a reference to row zero (where the row was inserted)
   dr = Me.DsBooks1.Books(0)
   Dim tb As TextBox = CType(e.Item.Cells(2).Controls(0), TextBox)
   dr.title = tb.Text
   Dim cb As CheckBox = CType(e.Item.Cells(3).Controls(1), CheckBox)
   dr.instock = cb.Checked
   Me.SqlDataAdapter1.Update(Me.DsBooks1)
   DataGrid1.EditItemIndex = -1
   'Refresh the dataset from the database
   DsBooks1.Clear()
   Me.SqlDataAdapter1.Fill(Me.DsBooks1)
   'Save the refreshed dataset in Session state agin
   Session( "DsBooks" ) = DsBooks1
   DataGrid1.DataBind()
End Sub