• Revista PROGRAMAR: Já está disponível a edição #53 da revista programar. Faz já o download aqui!

Senior

como criar uma consulta

11 mensagens neste tópico

oi

tenho aqui um problemazinho no meu programa,queria que o programa fosse buscar a informacoes a minha bd

eu pos uma textbox numa form,a minha intencao e escrever um nome de uma pessoa e ia buscar as informacoes a base de dados,tipo de uma consulta

obrigado

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Bom dia Senior.

Mas onde tens problemas? que base de dados usas? a criar a query? a ligar a base de dados? Tens de ser mais especifico por favor =)

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

por exemplo se escrever maria santos na textbox depois queria que aparecesse as informacoes da maria

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites
Dim nome As String = "Nome"
        Dim da As New SqlClient.SqlDataAdapter("Select * from Clientes where nome like '%" & nome & "%'", cnn)
        Dim ds As New DataSet
        da.Fill(ds)
        If ds.Tables(0).Rows.Count = 0 Then
            MsgBox("Sem Clientes")
        Else
            For Each DR As DataRow In ds.Tables(0).Rows
                MsgBox("Encontrado: " & DR("Nome").ToString)
            Next
        End If

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Se quiseres quando mudas o texto metes no textbox text change. Senão mete no botão

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

o meu codigo esta a dar erro mas na sei porque,diz que o cnn nao foi declarado

Dim nome As String = "Nomemembro"

        Dim da As New SqlClient.SqlDataAdapter("Select * from membros where nome like '%" & nome & "%'", cnn)

        Dim ds As New DataSet

        da.Fill(ds)

        If ds.Tables(0).Rows.Count = 0 Then

            MsgBox("Sem Clientes")

        Else

            For Each DR As DataRow In ds.Tables(0).Rows

                MsgBox("Encontrado: " & DR("Nome").ToString)

            Next

        End If

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!


Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.


Entrar Agora