BUSCA PELA CELULA DO GRID

ROBFERREIRAA 29/11/2012 15:40:03
#415065
ola gente blz ?
alguem pode me dar uma luz ?

estou tentando fazer uma busca com dados que tenho no gid para saber se as linhas que estao no grid ja estao nao banco de dadobigado


For Each x As DataGridViewRow In DGindicador.Rows
Dim conectar As SqlConnection
conectar = New SqlConnection()
conectar.ConnectionString = [Ô]server=iu500010174044; uid=Admin; pwd=mesa123; database=CTR[Ô]
Dim reader As System.Data.SqlClient.SqlDataReader
Dim cmd As System.Data.SqlClient.SqlCommand
cmd = New System.Data.SqlClient.SqlCommand([Ô]select Contrato_Mae from responsaveis_indicadores WHERE Contrato_Mae = [ô][Ô] & x.Cells(3).Value.ToString & [Ô][ô][Ô], conectar)
conectar.Open()
reader = cmd.ExecuteReader
If reader(x.Cells(3).Value.ToString) = True Then
MessageBox.Show([Ô]Já existe[Ô])


Else
MessageBox.Show([Ô]prossiga[Ô])
Exit Sub
End If

conectar.Close()
Next
ALEVALE 29/11/2012 15:47:54
#415066
Tá mais qual o erro ?
ROBFERREIRAA 29/11/2012 17:18:19
#415078
no index que esta o erro o index é o correto ele ate esta me retorno o que esta na celula do grid
ROBIU 30/11/2012 09:25:43
#415118 Resposta escolhida
Tente assim:

Dim conectar As SqlConnection
    conectar = New SqlConnection()
    conectar.ConnectionString = [Ô]server=iu500010174044; uid=Admin; pwd=mesa123; database=CTR[Ô]
    Dim reader As System.Data.SqlClient.SqlDataReader
    Dim cmd As System.Data.SqlClient.SqlCommand
    conectar.Open()

    For Each x As DataGridViewRow In DGindicador.Rows
        If x.Index < DGindicador.RowCount - 1 Then
                cmd = New System.Data.SqlClient.SqlCommand([Ô]select Contrato_Mae from responsaveis_indicadores WHERE Contrato_Mae = [ô][Ô] & x.Cells(3).Value.ToString & [Ô][ô][Ô], conectar)
                reader = cmd.ExecuteReader
                If reader.Read = True Then
                    MessageBox.Show(reader(0) & [Ô] Já existe[Ô])
                Else
                    MessageBox.Show([Ô]prossiga[Ô])
                    Exit Sub
                End If
                reader.Close()
            End If

    Next
    conectar.Close()
ROBFERREIRAA 30/11/2012 12:27:26
#415151
deu creto obrigado pela ideia
Tópico encerrado , respostas não são mais permitidas
Voltar