Estimados
tengo un dataGridview que los lleno desde un select
Código:Dim daPersonal As New SqlDataAdapter(cSql1, nCnxRRHH) daPersonal.Fill(dsBasedatos, "Personal") dgvPersonal.DataSource = dsBasedatos dgvPersonal.DataMember = "Personal" Me.Formato_dgvpersonal() 'Cambio los valores a unas celda en el mismo datagridview y otras lo cambio mediante una asignacion ' Cambiar valores dgvPersonal.Rows.Item(Nfila).Cells(nColumna).Value = Me.cmbSeccion.Text dgvPersonal.Rows.Item(Nfila).Cells(nColumnaValue).Value = Me.cmbSeccion.SelectedValue ' lo cual despues de recorro el datagrib para grabar ala base de datos Grabar_Asignacion() Dim table As DataTable = DirectCast(dsBasedatos.Tables("Personal"), DataTable) Dim changeTable As DataTable = table.GetChanges(DataRowState.Modified) changeTable.Select(Nothing, Nothing, DataViewRowState.CurrentRows) TssBarra.Maximum = changeTable.Rows.Count TssBarra.Minimum = 1 TssEstado.Text = "Grabando Datos ..." cmd.Connection = nCnxRRHH 'Y aca se me presenta un problema siempre la ultima fila modificada no graba For i = 0 To changeTable.Rows.Count - 1 TssBarra.Value = i + 1 cmd.Parameters.AddWithValue("@cIdDestaque", changeTable.Rows(i).Item("Iddestaque").ToString.Trim) cmd.Parameters.AddWithValue("@cIDSemana", changeTable.Rows(i).Item("AñoSemana").ToString.Trim) cmd.Parameters.AddWithValue("@cidSeccion_costo", changeTable.Rows(i).Item("idseccion_costo").ToString.Trim) cmd.Parameters.AddWithValue("@cEquipo", changeTable.Rows(i).Item("equipo").ToString.Trim) cmd.Parameters.AddWithValue("@cOperacion", changeTable.Rows(i).Item("operacion").ToString.Trim) cmd.Parameters.AddWithValue("@cDia01", changeTable.Rows(i).Item("dia01").ToString.Trim) cmd.Parameters.AddWithValue("@cDia02", changeTable.Rows(i).Item("dia02").ToString.Trim) cmd.Parameters.AddWithValue("@cDia03", changeTable.Rows(i).Item("dia03").ToString.Trim) cmd.Parameters.AddWithValue("@cDia04", changeTable.Rows(i).Item("dia04").ToString.Trim) cmd.Parameters.AddWithValue("@cDia05", changeTable.Rows(i).Item("dia05").ToString.Trim) cmd.Parameters.AddWithValue("@cDia06", changeTable.Rows(i).Item("dia06").ToString.Trim) cmd.Parameters.AddWithValue("@cDia07", changeTable.Rows(i).Item("dia07").ToString.Trim) 'cmd.Parameters.AddWithValue("@dFEcha", Date.Today) RunStoreGraba("COSTOS.SP_GRABA_PLANILLA") cmd.ExecuteNonQuery() cmd.Parameters.Clear() nCnxRRHH.Close() Next End Sub
si solo modifico una fila no hay nada que modificar
la sentencia "changeTable.Select(Nothing, Nothing, DataViewRowState.CurrentRows)" no hace nada
que es lo que Estoy haciendo mal
me parece que cuando asigno la data al datagrid no se graba totalmente de la memoria y es por eso que el select no encuentra nada alguien me ayuda
Gracias por su comentario