USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Como montar esta instrução SQL?
Perci
não registrado
Postada em 01/06/2006 15:35 hs   
Olá, pessoal, se alguém puder me ajudar nesta...

Tenho 2 tabelas:

ORCAMENTOS
NumPed    DataPed       NumOrdem
000001    13/05/2006       1
000002    13/05/2006       1

ITENS
NumPed    DataPed       Quant1      Quant2
000001    13/05/2006       0             12
000001    13/05/2006      13             11
000002    13/05/2006        5              5
000002    13/05/2006        0              1

 No Form eu digito num TextBox o numero da ordem .
Tenho que buscar no ORCAMENTO o campo NumOrdem que corresponde ao digitado no TextBox.
Ai tenho que buscar no ITENS os registros correspondentes, e onde a Quant1 tem que ser diferente de 0 (zero).

 Se eu digitar NumOrdem 1, tem que pesquisar o ORCAMENTOS o NumPed 000001;
verificar se Quant1 = 0, ignorar; se for <> 0, mostrar no ListView.
Pesquisar o proximo NumPed, e assim por diante...

Gostaria de saber como fazer a consulta no sql.

Exemplo:
Digito no TextBox o numero 1.

No ListView teria que aparecer: 

NumPed     DataPed        Quant
000001     13/05/2006       13
000002     13/05/2006        5

Deu para entender?

     
Daniel
Pontos: 2843
SÃO PAULO
SP - BRASIL
ENUNCIADA !
Postada em 01/06/2006 16:22 hs            
Tabela1= Orcamento e Tabela2 = Itens
 
sql="SELECT Tabela2.NumPed, Tabela2.DataPed, Tabela2.Quant1 " & _
      "FROM Tabela1 INNER JOIN Tabela2 ON Tabela1.NumPed = Tabela2.NumPed " & _
      "WHERE (((Tabela2.Quant1)<>0) AND ((Tabela1.NumOrdem)=" & text1.text & "));"

dsmn
   
Martini
Pontos: 2843 Pontos: 2843
PAROBÉ
RS - BRASIL
Postada em 01/06/2006 18:40 hs         
Select ORC.NumPed, ORC.DataPed, I.Quant
From ORCAMENTOS ORC Inner Join ITENS I On I.NumPed = ORC.NumPed And I.Quant <> 0
Where ORC.NumOrdem = 1
     
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2025   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página