UPDATE DADOS MARCADOS COM CHECKBOX DATAGRIDVIEW

W8.LISBOA 01/07/2015 16:22:49
#448388
Ola pessoal,

é o seguinte, preciso fazer um update em algumas linhas de um datagridview que estejam marcadas com um checkbox = true, tentei algo aqui, mas somente altera a primeira linha, segue o código ate aqui:

          Using con As MySqlConnection = ConexaoComMysql()
            Try
                con.Open()
                Dim sql As String = [Ô]UPDATE tabela SET Situacao = @SITUACAO WHERE ID = @ID[Ô]
                Dim cmd As New MySqlCommand(sql, con)

                For i As Integer = 0 To DataGridView1.Rows.Count - 1
                    If ChecKedDatagrid.Selected = True Then
                        cmd.Parameters.Clear()
                        cmd.Parameters.Add([Ô]@SITUACAO[Ô], MySqlDbType.VarChar).Value = ComboBox1.Text
                        cmd.Parameters.Add([Ô]@ID[Ô], MySqlDbType.VarChar).Value = DataGridView1.Rows.Item(i).Cells(1).Value.ToString
                        Try
                            cmd.ExecuteNonQuery()
                        Catch ex As Exception
                            MessageBox.Show(ex.Message)
                        End Try
                    End If
                Next i
            Catch ex As Exception
            End Try
        End Using


Sugestões??
JABA 01/07/2015 17:17:03
#448391 Resposta escolhida
Tente assim:

Using con As MySqlConnection = ConexaoComMysql()
            Try
                con.Open()
                Dim sql As String = [Ô]UPDATE tabela SET Situacao = @SITUACAO WHERE ID = @ID[Ô]
                Dim cmd As New MySqlCommand(sql, con)

                For i As Integer = 0 To DataGridView1.Rows.Count - 1
                    If DataGridView1.Rows(i).Cells(2).Value = True Then [ô]Eu coloquei o 2 como indice no Cells, porém você terá que colocar o indice da coluna CheckBox no lugar dele
                        cmd.Parameters.Clear()
                        cmd.Parameters.Add([Ô]@SITUACAO[Ô], MySqlDbType.VarChar).Value = ComboBox1.Text
                        cmd.Parameters.Add([Ô]@ID[Ô], MySqlDbType.VarChar).Value = DataGridView1.Rows.Item(i).Cells(1).Value.ToString
                        Try
                            cmd.ExecuteNonQuery()
                        Catch ex As Exception
                            MessageBox.Show(ex.Message)
                        End Try
                    End If
                Next i
            Catch ex As Exception
            End Try
        End Using
W8.LISBOA 01/07/2015 17:27:45
#448392
Valeu JABA, problema resolvido.
Tópico encerrado , respostas não são mais permitidas
Voltar