PROBLEMAS NO WHERE (VARI?VEL)

HELIOPASSOS 20/03/2017 17:51:15
#472558
Boa tarde!

como eu faço para usar uma variável texto num where de um Select?

Public Function ObterProdCombo(ByVal LEspecie As String) As DataSet
Dim mEstq As New Produto
Dim sSql As String = [Ô]SELECT Descricao From Estoque WHERE Especie = [Ô] & LEspecie
[ô]
cn = getConexaoDB()
Try
Dim da As New OleDbDataAdapter(sSql, cn)
da.SelectCommand.CommandType = CommandType.Text
Dim ds As New DataSet()
da.Fill(ds)
Return ds
Catch ex As Exception
Throw ex
Finally
closeConexaoDB(cn)
End Try
[ô]Return ds
End Function

Esta function não está me retornando os registros para preencher um combobox.
Alguém teria uma ajudazinha ai? Me retorna erro dizendo que nenhum valor foi fornecido para um ou mais parâmetros.
No form eu passo um valor para LEspecie que estou utilizando para compor o WHERE.
WHERE Especie = LEspecie
Estou usando Texto não numeral na LEspecie.
Obrigado
PLUGSOFTSM 20/03/2017 19:50:50
#472563
Resposta escolhida
Dim mEstq As New Produto
Dim sSql As String = [Ô]SELECT Descricao From Estoque WHERE Especie = [ô][Ô] & LEspecie & [Ô][ô][Ô]

Coloca a variável entre [ô] [ô](aspas)
KERPLUNK 20/03/2017 20:13:19
#472564
1 - Não use DataAdapter, use DataReader
2 - Use parâmetros e não concatenação de string
HELIOPASSOS 23/03/2017 08:26:11
#472656
Obrigado PLUGSOFTSM.
Era isso mesmo. Funcionou. Eu não lembrava mais, só utilizei com variável numérica e estava apanhando. Muito obrigado!
Tópico encerrado , respostas não são mais permitidas