OPERADOR FALTANDO

 Tópico anterior Próximo tópico Novo tópico

OPERADOR FALTANDO

VB / VBA

 Compartilhe  Compartilhe  Compartilhe
#445645 - 02/04/2015 17:02:59

MARIOANDRADE
SANTO ANTONIO DE JESUS
Cadast. em:Abril/2012


Meus amigos, estou tendo um erro de operador faltando no código abaixo, alguém pode ajudar??
rs.Open "select *from TBVinculada where NumTab=" & cmbCodTab.Text & " and not (Parcelas is not null)", db, 3, 3


Banco de dados Access.

Cursos de Excel e VB6:
cursoexcelvba.com.br



#445647 - 02/04/2015 17:30:35

RO_DRIGOSG
SAO PAULO
Cadast. em:Julho/2004


Boa tarde,

Veja se pode ser isso:
Se o valor do campo NumTab da tabela TBVinculada  é um varchar, adicione as aspas simples, ex:

rs.Open "select *from TBVinculada where NumTab= '" & cmbCodTab.Text & "' and not (Parcelas is not null)", db, 3, 3


Falou, um abraço !!!
Rodrigo Gomes !!!
Se consegui te ajudar, por favor, encerre o seu tópico.
Se você me ajudou, obrigado.


#445649 - 02/04/2015 17:44:29

RO_DRIGOSG
SAO PAULO
Cadast. em:Julho/2004


Esqueci de dizer também, posta o erro ai pra gente ver.

Falou, um abraço !!!
Rodrigo Gomes !!!
Se consegui te ajudar, por favor, encerre o seu tópico.
Se você me ajudou, obrigado.


#445650 - 02/04/2015 17:53:30

LUIZCOMINO
SAO PAULO
Cadast. em:Maio/2009


amigo o select *from esté grudado tem que separar select * from, tente

rs.Open "select * from TBVinculada where NumTab=" & cmbCodTab.Text & " and not (Parcelas is not null)", db, 3, 3

"E conhecereis a verdade, e a verdade vos libertará. João 8:32"


#445653 - 02/04/2015 18:36:48

MARIOANDRADE
SANTO ANTONIO DE JESUS
Cadast. em:Abril/2012


 Anexos estao visíveis somente para usuários registrados

RO_DRIGOSG, a sua busca está para texto e o campo é número.
LUIZCOMINO , o seu código retornou  o mesmo erro de antes.





Cursos de Excel e VB6:
cursoexcelvba.com.br



Resposta escolhida #445655 - 02/04/2015 19:00:58

FFCOUTO
COM LEVY GASPARIAN
Cadast. em:Março/2005


M4R10, você está usando o not entre os is null. Essa sintaxe não existe. Outra coisa, use as condições entre parênteses pois o código fica mais legível e fácil de identificar erros.

rs.Open "select *from TBVinculada where NumTab=" & cmbCodTab.Text & " and not (Parcelas is not null)", db, 3, 3


deve ser

rs.Open "SELECT * FROM TBVinculada WHERE (NumTab = " & cmbCodTab.Text & ") AND (NOT Parcelas IS NULL)", db, 3, 3


Cursos de Excel e VB6:
cursoexcelvba.com.br


 Tópico anterior Próximo tópico Novo tópico


Tópico encerrado, respostas não sao permitidas
Encerrado por MARIOANDRADE em 02/04/2015 20:39:26