Ir para o conteúdo
  • Revista PROGRAMAR: Já está disponível a edição #60 da revista programar. Faz já o download aqui!

Luisveiga18

Duvida - Preencher Label com dados da BD

Mensagens Recomendadas

Luisveiga18

Bom dia!

De momento a única forma que eu estou a encontrar de "mostrar" os dados da minha base de dados é partir de uma datagrid. Mas eu gostaria de saber se é possível mostrar os dados de uma certa tabela em labels.

Ou seja o meu objetivo seria, localizar, a partir da chave primaria, e depois mostrar os dados associados a essa chave primaria em labels e nao numa datagrid.

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites
NunoDinis

Sim, é possível. O código abaixo está feito para SQL, caso não seja a que estás a usar só precisas de adaptar os comandos..

Dim query As String = "QUERY"
Dim cmd As New SqlCommand(query, conexao)
' Cria uma consulta paremetrizada
  cmd.Parameters.Add(New SqlParameter("Nome", nome))
' executa a consulta.
  Dim dr As SqlDataReader = cmd.ExecuteReader(CommandBehavior.SingleRow)
' exibe o resutlado nas labels
If dr.HasRows Then
	dr.Read()
label1.text= dr.Item(1).ToString
   label2.text= dr.Item(0).ToString
  End if

Editado por NunoDinis

Estranha forma de vida que tem a capacidade de transformar comandos em mensagens de erro.

ndsotware.org

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites
Luisveiga18

Mas tipo eu queria que ele mostra-se os dados depois de fazermos uma procurar pelo nome de um fornecedor, sendo que o nome não é chave principal. Existe alguma forma de o fazer e mostrar esses dados numa label?

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites
Kline777

Nem precisas de fazer o codigo para mostrar a info na label. Nas propriedades da label tens lá uma propriedade chamada databinding (penso eu) e dizes a que campo da tabela queres ligar a label

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites
prokton

Acho que assim dá para extrair a info de uma base dados:

LblIdCliente.Text = ds.Tables("dsClientes").Rows(0).Item(0)
LblNome.Text = ds.Tables("dsClientes").Rows(0).Item(1)

Editado por apocsantos
geshi+texto

Partilhar esta mensagem


Ligação 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

×

Aviso Sobre Cookies

Ao usar este site você aceita os nossos Termos de Uso e Política de Privacidade. Este site usa cookies para disponibilizar funcionalidades personalizadas. Para mais informações visite esta página.