none
Como fazer para pesquisar Nome do cadastro atravez do comando select RRS feed

  • Pergunta

  • galera boa tarde voces tao bem? bom estou querendo fazer uma pesquisar de nomes de cadastro atraz do campo combo box onde eu digito o nome e aparece as informacao nos text box segue do codigo

     Private Sub PCarregaDadosNomes()
            Using con As OleDbConnection = geetConectionCadClientesFotos()

                Try
                    con.Open()
                    Dim sql As String = "SELECT nome FROM usuarios WHERE codigo="
                    Dim cmd As OleDbCommand = New OleDbCommand(sql, con)
                    Dim da As OleDbDataAdapter = New OleDbDataAdapter(cmd)
                    Dim dt As DataTable = New DataTable
                    da.Fill(dt)
                    cmbPesquisar.DataSource = dt


                Catch ex As Exception
                    MsgBox(ex.Message)
                Finally
                    con.Close()
                End Try





            End Using





        End Sub


    XD


    • Editado jose_down sexta-feira, 3 de março de 2017 19:22
    sexta-feira, 3 de março de 2017 19:21

Todas as Respostas

  •  Private Sub PCarregaDadosNomes()
            Using con As OleDbConnection = geetConectionCadClientesFotos()

                Try
                    con.Open()
                    Dim sql As String = "SELECT nome FROM usuarios WHERE codigo= @codigo"
                    Dim cmd As OleDbCommand = New OleDbCommand(sql, con)
    cmd.Parameters.AddWithValue("@codigo", 1001)
    Dim da As OleDbDataAdapter = New OleDbDataAdapter(cmd)
                    Dim dt As DataTable = New DataTable
                    da.Fill(dt)
                    
    cmbPesquisar.DataSource = dt


                Catch ex As Exception
                    MsgBox(ex.Message)
                Finally
                    con.Close()
                End Try





            End Using





        End Sub
    sexta-feira, 3 de março de 2017 19:34
  • sim mais n esta aparecendo a pesquisa no data griew tem algum codigo que coloco tbm para aparecer as pesquisa do combo box nos text box tipo nome senha email e tal?

    XD

    sexta-feira, 3 de março de 2017 19:50
  • cmbPesquisar.DataSource = dt

    cmbPesquisar.DataBind()

    sexta-feira, 3 de março de 2017 20:32
  • nao funciona disse que nao é membro da form atual

    XD

    sexta-feira, 3 de março de 2017 20:53