Jump to content
aprendiz93

Vb.Net trazendo todas as informações do Bd

Recommended Posts

aprendiz93

Bom dia geral tenho um botão chamado clientes cadastrados, quero q quando clicar neste botão ele traga todos os clientes já cadastrados no bd "access" e mostrar na tela criada.

agradeço desde já pela força.

Share this post


Link to post
Share on other sites
Andrepereira9

http://vbtuga.blogspot.com/2008/04/vbnet-gesto-de-dados-em-sql-server.html

http://vbtuga.blogspot.com/2008/04/vbnet-gesto-de-dados-em-sql-server_16.html

Dim ligação As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=Caminho para a BD;Persist Security Info=False;"

        Dim SQL As String = "SELECT * from NomeTabela"

        Dim connection As New OleDbConnection(ligação)

        Dim command As New OleDbCommand(SQL, connection)

        connection.Open()

        Dim leitor As OleDbDataReader = command.ExecuteReader()

        If leitor.HasRows Then

            While leitor.Read()
                Nome.text += leitor.Item("Nome")
                Morada.text += leitor.Item("Morada")
            End While

        End If

        connection.Close()
        connection = Nothing
        command = Nothing


A informática chegou para resolver problemas que antes não existiam

Quem ri por último é porque está conectado a 52 Kbs.

Share this post


Link to post
Share on other sites
ribeiro55

Não "Sr. aprendiz93", não deixou bem clara a pergunta, até porque não fez nenhuma.

O que se faz por aqui, num quadro de linguagem específico, é tirar dúvidas, e como tal existem alguns protocolos importantes, como o indicar o que já tem/sabe, e o que pretende exactamente.

  • Já existe a tabela de utilizadores?
  • Como é constituída?
  • Como quer apresentar a informação?
  • yada yada yada ...

Por acaso sei o que é "BD". Muito obrigado de qualquer maneira.


Sérgio Ribeiro


"Great coders aren't born. They're compiled and released"
"Expert coders do not need a keyboard. They just throw magnets at the RAM chips"

Share this post


Link to post
Share on other sites
Andrepereira9

O teu problema não está no código. esta no evento da listbox

Repara que só tens

Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs)

Falta-te isto

Handles ListBox1.SelectedIndexChanged

Ou seja, fica assim

Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged


A informática chegou para resolver problemas que antes não existiam

Quem ri por último é porque está conectado a 52 Kbs.

Share this post


Link to post
Share on other sites
Andrepereira9

boas

o problema é que não estas a adicionar nada ao ListBox1, e estas a ler os dois campos de uma vez. tem de ser um de cada vez

Em vez de:

ListBox1.Text += leitor.Item("Código,Razão Social")

Tenta assim:

ListBox1.Items.Add(leitor.Item("ID").ToString + " " + leitor.Item("Razão Social")).ToString()


A informática chegou para resolver problemas que antes não existiam

Quem ri por último é porque está conectado a 52 Kbs.

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

×
×
  • Create New...

Important Information

By using this site you accept our Terms of Use and Privacy Policy. We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.