Ver Mensaje Individual
  #10 (permalink)  
Antiguo 23/06/2005, 18:20
Avatar de Krotalo
Krotalo
 
Fecha de Ingreso: marzo-2002
Ubicación: Mexicalpan de las Tunas
Mensajes: 48
Antigüedad: 22 años, 2 meses
Puntos: 0
Exactamente ami me pasa lo mismo, no puedo hacer un update, desde el datagrid utilizando BoundColumns este es mi codigo:
-----------
Dim DS As DataSet 'declara el dataset
Dim Comando As OleDbCommand 'declara el oldbcommand
Dim Sqlstring As String = "UPDATE Localidad SET nom_loc = @nloc where id_loc = @Idloc;" 'inicializa la sentencia sql
Comando = New OleDbCommand(Sqlstring, ConnBd) ' inicializa el comando oldb con la cadeba sql y la conexcion ala bd
Comando.Parameters.Add(New OleDbParameter("@Idloc", OleDbType.integer, 11)) 'crea el parametro @idloc
Comando.Parameters.Add(New OleDbParameter("@nloc", OleDbType.Char, 40))'crea el parametro @nloc
Comando.Parameters("@Idloc").Value = Datagrid.DataKeys(CInt(E.Item.ItemIndex)) ' inicializa @idloc = a el elemento editado en el datagrid

mensaje2.InnerHtml = Comando.Parameters("@Idloc").Value.ToString()' para monitorear el valor de @ideloc

Dim Cols As String() = {"@Idloc","@nloc"} ' define un arreglo con los parametros
Dim NumCols As Integer = E.Item.Cells.Count 'cuanta cuantas columnas tiene el datagrid
Dim I As Integer 'un contador
For I=2 To NumCols-1 'omite la primera y segunda columna osea los controles de edicion y la columna que muestra los id's
Dim CurrentTextBox As System.Web.UI.WebControls.TextBox ' declara un objeto tipo texbox
CurrentTextBox = E.Item.Cells(I).Controls(0) 'asigna el valor introducido en el texbox del datagrid al objeto anterior
Dim ColValue As String = CurrentTextBox.Text 'crea una variable strin y asigana el valor de la variable anterior
Comando.Parameters(Cols(I-1)).Value = ColValue 'inicializa los parametros con los valores introducidos en el datagrid
mensaje3.InnerHtml = Comando.Parameters(Cols(I-1)).Value.ToString() ' para monitoriear los valores
Next
Comando.Connection.Open() 'abre
mensaje4.InnerHtml = Comando.Parameters("@Idloc").Value.ToString()'moni torea el parametro
Try
Comando.ExecuteNonQuery()'executa
mensaje.InnerHtml = "Registro actualizado" & Sqlstring.ToString() 'mesnaje de confirmacion y muestra la sentencia SQL
Datagrid.EditItemIndex = -1'cierra la columna edicion
Catch Exp As OleDbException

mensaje.InnerHtml = "Error no se pudo actualizar el registro"

End Try
Comando.Connection.Close()
BindGrid() ' recarga el datagrid

-------------------------------

y pues los parametros tienen los valores correctos, pero no actualiza el registro, ni nada, alguien sabe a que se debe?????
__________________
:neurotico
:ojotes