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

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Consulta sql
Perci
MATÃO
SP - BRASIL
Postada em 22/02/2008 13:36 hs            
Olá amigos,
Tenho uma tabela de clientes e uma tabela de bairros.
E preciso criar um relatório de todos os clientes, só que por bairro.
Então eu consulto na tabela de bairros:
 
sqlbairro="Select * From Bairros Order By nomebairro"
Set rsbairro = db.OpenRecordSet(sqlbairro)
Do Until rsbairro.EOF
 
Aí eu tenho que consultar os clientes por bairro.
 
sqlcli = "Select * From Clientes Where codbairro = " & rsbairro("codbairro")
set rscli = db.OpenRecordSet(sqlcli)
Do Until rscli.EOF
 
Só que existem bairros cadastrados onde não existem clientes, então na hora de imprimir vai sair folhas com cabeçalho, mas sem clientes para listar. Gostaria de saber como faço para não imprimir, quando não tiver nenhum cliente para o bairro pesquisado.
 
Até mais.
     
Treze
Pontos: 2843 Pontos: 2843
SÃO VICENTE
SP - BRASIL
Postada em 22/02/2008 13:55 hs            
sqlcli = "Select * From Clientes Where codbairro ='" & rsbairro("codbairro") & "' and nomecliente<>''"
 
ou
 
 
dentro do loop coloque o seguinte
Do Until rscli.EOF
if rsclientes("nomecliente")<>"" then
' aqui você coloca o seu código que faz a listagem
end if
Loop
 
TÓPICO EDITADO
   
Perci
MATÃO
SP - BRASIL
Postada em 22/02/2008 14:31 hs            
Treze, assim não deu certo.
A idéia é a seguinte:
 
Relatório de TODOS os CLIENTES organizados por BAIRROS
 
Pesquiso o Bairro (pelo código)
"sqlbairro="Select * From Bairros Order By nomebairro"
Pesquiso os Clientes, quais tem o código do bairro cadastrado
"sqlcli="Select * From Clientes Where codbairro=" & rsbairro("codbairro")
 
Só que se tiver um bairro que não tem cliente nenhum cadastrado nele, tenho que pular o registro da tabela de bairro e pesquisar outro bairro. Entendeu?
Porque senão, como existem, por exemplo, 30 bairros cadastrados, porém, tenho apenas 20 clientes cadastrados, significa que alguns bairros, na hora de imprimir, irão imprimir apenas o cabeçalho, mas sem registros de clientes. Então eu queria que na hora de pesquisar o bairro e os clientes, se tivesse algum bairro sem clientes, não imprimisse uma página em branco. Ok?
 
     
Treze
Pontos: 2843 Pontos: 2843
SÃO VICENTE
SP - BRASIL
Postada em 22/02/2008 14:51 hs            
bom na tabela cliente tem o nome do bairro gravado, se sim , então basta você fazer a pesquisa na tabela clientes
 
"Select * From Clientes ORDER BY nomebairro"
 
a SQL acima lista todos os clientes ordenados pelo nome dos bairros
 
ou seja somente os clientes cadastrados.
 
não havendo necessidade da primeira sql
 
agora a seguinte sql que eu havia postado anteriormente
 
sqlcli = "Select * From Clientes Where codbairro ='" & rsbairro("codbairro") & "' and nomecliente<>''"
 
ela faz o seguinte pesquisa todos os clientes pelo codbairro onde o nome do cliente não está em branco
 
pelo menos foi isso que eu entendi
 
agora veja se aprimeira sql vai resolver
 
 
     
Treze
Pontos: 2843 Pontos: 2843
SÃO VICENTE
SP - BRASIL
ENUNCIADA !
Postada em 22/02/2008 15:00 hs            
agora se não for isso diga quais os campos que a tabela Bairro e a tabela Clientes possui
 
o ideal seria atabela clientes possuir, além dos demais campos os campos (codBairro, NomeBairro)
   
Roßerto
Pontos: 2843 Pontos: 2843 Pontos: 2843 Pontos: 2843 Pontos: 2843
SAO PAULO
SP - BRASIL
ENUNCIADA !
Postada em 22/02/2008 15:02 hs            
Perci, vc pode fazer essa consulta usando o JOIN
 
SELECT Clientes.*
FROM bairro INNER JOIN Clientes ON bairro.bairro = Clientes.bairro
 
Roberto
 
 
   
Página(s): 1/3      PRÓXIMA »


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

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

HTML DESLIGADO

     
 VOLTAR

  



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