Update en el datagrid

[almaluz]

Bueno otra vez estoy aqui.

Ya lo he solucionado lo de los errores, este es el codigo completo, con el datagrid del mensaje anterior.

Código:

Sub DgCarrito_Update(obj As Object, e As DataGridCommandEventArgs)
     Dim MyCommand As oleDbCommand

     Dim strSQL As String = ("UPDATE pedidos SET cantidad= @nuevovalor Where codigo= @codigo ; ")

    Mycommand = New OledbCommand(strSQL,ObjConn)
    MyCommand.Parameters.Add(New OledbParameter("@codigo", oledbType.Char, 20))
    MyCommand.Parameters.Add(New OledbParameter("@nuevovalor", oledbType.Integer, 10))

    MyCommand.Parameters("@codigo").Value = dgCarrito.DataKeys(e.Item.ItemIndex)

    Dim nuevovalor As String
     nuevovalor = CType(e.Item.Cells(1).Controls(0),TextBox).Text


     MyCommand.Parameters("@nuevovalor").Value = NuevoValor

    Try
        ObjConn.Open()
        MyCommand.ExecuteNonQuery()
        DgCarrito.EditItemIndex = -1
        lblMensaje.Text = "Actualizado con exito <br>" & strSQL & " <BR>" & nuevovalor & " " & dgCarrito.DataKeys(e.Item.ItemIndex)

    Catch ex As Exception
        lblMensaje.Text = ex.message & "Error al Actualizar"
    End Try

    ObjConn.Close()
    mostrarCarrito()
 End Sub

Todo funciona bien, solo que .... No hace nada
Es decir, .. no hace hada, el registro no se actualiza

Alguna idea por favor