select com condiçao AND


	Fórum
	Visual Basic

Responder

Voltar

Autor

Assunto: select com condiçao AND

Aginaldo

JUIZ DE FORA
MG - BRASIL

Postada em 29/01/2006 10:58 hs

TENHO UMA TABELA COM OS CAMPOS N_NOTA,CODIGO,FORNECEDOR,QUANTIDADE,VALOR
NO MEU FORM TENHO OS TEXT (TXTFORNECEDOR E TXTNNOTA)

TABELA CHAMADA DE (PRODNOTAFISC)

GOSTARIA DE LISTAR EM UM GRID TODOS OS REGISTOS ENQUANTO N_NOTA = TXTNNOTA e
FORNECEDOR = TXTFORNECEDOR

DBGRID1
DATA1

TENHO O SEGUINTE CODIGO

   Dim SQLLOCPRODNOTA1 As String

   CRITERIOFILTROPROD1 = TXTNNOTA.Text
   CRITERIOFILTROPROD2 = TXTFORNECEDOR.Text
   SQLLOCPRODNOTA1 = ("SELECT * FROM PRODNOTAFISC WHERE N_NOTA = CRITERIOFILTROPROD1 " And " FORNECEDOR = CRITERIOFILTROPROD2")
   Data1.RecordSource = SQLLOCPRODNOTA1
   Data1.Refresh

O QUE ESTA ERRADO NESTE CODIGO

TERIA OUTRA FORMA MENOS COMPLICADA

Beto37

SUMARÉ
SP - BRASIL

Postada em 29/01/2006 13:37 hs

Olá Agnaldo!

Se o Campo TXTNNOTA.Text, for Número, vc deve usar uma função de Conversão

para string:

= Val( TXTNNOTA.Text)

Vê se funciona agora?

Elieser Topassi

SÃO JOSÉ DO RIO PRETO
SP - BRASIL

Postada em 29/01/2006 14:04 hs

SQLLOCPRODNOTA1 = "SELECT * FROM PRODNOTAFISC WHERE N_NOTA = " & TXTNNOTA & " AND FORNECEDOR = '" & TXTFORNECEDOR.TEXT & "'"

Testa ai...

Elieser Carlos Topassi
Analista de Sistemas - Desenvolvedor VB/ASP/.Net

e-mail/msn: elieser_topassi@yahoo.com.br
São José do Rio Preto,SP - Brasil
_____________________________________________________
"O caminho do tolo aos seus prórios olhos lhe parece reto, mas o sábio ouve conselhos" (Pv 12:15)

Alfterra

SÃO PAULO
SP - BRASIL

Postada em 30/01/2006 10:10 hs

só se a tenta para os campos da tabela se sao numeros ou texto....

Aginaldo

JUIZ DE FORA
MG - BRASIL

Postada em 30/01/2006 17:28 hs

Executei as dicas acima mas nao adiantou, da erro de sintax na expessao

Tekki

UBERLÂNDIA
MG - BRASIL

ENUNCIADA !

Postada em 30/01/2006 18:54 hs

Como esta o RecordsetType do Data1?

Na janela de propriedades veja se esta como Dynaset ou Table.

Se não estiver como Dynaset, mude. E siga as dicas das outras respostas.

Data1.RecordsetType = Dynaset

Página(s): 1/2 PRÓXIMA »

Seu Nome:
Seu eMail:		ALTERAR PARA MODO HTML
Mensagem: [:)] = [:P] = [:(] = [;)] = HTML DESLIGADO

VOLTAR