Ir para o conteúdo
He B TeMy

Procurar na base de dados

Mensagens Recomendadas

He B TeMy

Boa tarde,

Estou a usar este código para procurar pelos valores duma tabela.

Try
Dim BaseDados As String = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Application.StartupPath & "\stocks.mdb"
Dim query As String = "SELECT QuantidadeDisponivel FROM TProdutos WHERE NomeProduto = 'valor1'"
Dim connection As New OleDbConnection(BaseDados)
Dim DataAdapter = New OleDbDataAdapter(query, connection)
Dim DataSet = New DataSet
DataAdapter.Fill(DataSet, "TProdutos")
TextBox18.DataBindings.Add(New Binding("Text", DataSet, "TProdutos.QuantidadeDisponivel"))
connection.Close
connection = Nothing
 Catch
 End Try

O que eu queria era seleccionar os valores um a um, isto é, em vez de ter = 'valor1' ser igual ao primeiro valor, por defeito...

Segundo, terceiro e afins... pensei em usar a numeração automática igualando-a ao "NomeProduto = '1'".

Mas dá-me este erro, http://prntscr.com/1k92a1

Alguém sabe porquê?

Edit: Já descobri o porquê, estava a por o "1" com ' (como string, o que não pode ser)...

Editado por He B Te My

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.