Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

caezar

Acessando um um valor de um textBox em um gridview dinamicamente

Recommended Posts

Fala Galera,

 

Tenho um girview com 2 colunas templates, nelas adicionei um textbox, no qual o usuário pode preencher.

 

Acontece que criei um botão que deveria pegar os valores destas colunas templates e salvar em uma outra tabela.

 

Segue o código:

 

Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs)
        Dim strSQL As String
        Dim MyConn As OleDbConnection
        Dim objDR As OleDbDataReader
        Dim Cmd As OleDbCommand
        Dim sqlQ As String
        
        
       
        MyConn = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" & Server.MapPath("./App_Data/Bd_Bolao.mdb"))
        MyConn.Open()
        
        
        For Each item As GridViewRow In Me.GridView3.Rows
            If item.RowType = DataControlRowType.DataRow Then
                Dim GM As String = CType(item.FindControl("TextBox3"), TextBox).Text
                Dim GV As TextBox = DirectCast(item.FindControl("TextBox4"), TextBox)
                Dim codJ As String = item.Cells(0).Text
                strSQL = "Select * from tblAposta Where codJogo=@codJogo AND codUser=@codUser"
                Cmd = New OleDbCommand(strSQL, MyConn)
                Cmd.Parameters.Add(New OleDbParameter("@codJogo", codJ))
                Cmd.Parameters.Add(New OleDbParameter("@codUser", Session("COD_USUARIO")))
                objDR = Cmd.ExecuteReader(CommandBehavior.CloseConnection)
                If objDR.Read() Then
                    sqlQ = "UPDATE tblAposta SET GolsM =" & GM & ", [GolsV] =" & GV.Text & " WHERE codJogo = " & codJ & " and codUser=" & Session("COD_USUARIO")
                Else
                    sqlQ = "Insert Into tblAposta (codJogo,codUser,GolsM,[GolsV]) Values(" & codJ & "," & Session("COD_USUARIO") & "," & GM & "," & GV.Text & ")"
                End If
                Dim Cmd1 As New OleDbCommand(sqlQ, MyConn)
                Cmd1.ExecuteNonQuery()
            End If
        Next
        MyConn.Close()
    End Sub

Desta forma os valores dos botões vem em branco. Acredito que seja pq os valore digitados estariam no cliente.

 

Alguem tem alguma idéia de como retomar estes valores?

 

abs

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.