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

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Consulta por nome + período de data..
Analista
CÁCERES
MT - BRASIL
Postada em 23/02/2006 23:08 hs            
Pessoal, olha eu aqui novamente, estou com outro probleminha, aliás uma velho problema que não consegui resolver ainda.
 
Tenho uma consulta, onde no load é setado em um DataSource vários lançamentos, onde apartir daí o usuário irá refinando a consulta, por (período, nome, cpf....)Porém necessito que esse refinamento (consulta) deva ser ao mesmo tempo por um determinado período e por nome de cliente. Exemplo: Fulano de Tal e todas as duplicatas vencida em uma determinada data. Tenho onde digito o nome do cliente e os campos DtInicial e DtFinal com a seguinte consulta:
 
    If DtFinal = "  /  /    " Then DtFinal = Date
    Data1.RecordSource = "Select * from LançCruze WHERE DtCadastro BETWEEN #" & _
    Format(DtInicial, "yyyy/mm/dd") & "# and #" & Format(DtFinal, "yyyy/mm/dd") & _
    "# order by Código"
Porém esta é só por período, ela não filtra o cliente.
 
Como é que faço pelo dois?
 
Desde já agradeço
 
Luciano
     
VACA
LIMEIRA
SP - BRASIL
ENUNCIADA !
Postada em 24/02/2006 06:35 hs            
Select * from <tabela> where data>=datevalue(' <datainicial> ') and data<= datevalue(' <data final> ') and nome = <nome>
OU
p/ acess
Select * from <tabela> where data>=datevalue(' <datainicial> ') and data<= datevalue(' <data final> ') and nome like '* <nome parcial> *'
p/ SQL
Select * from <tabela> where data>=datevalue(' <datainicial> ') and data<= datevalue(' <data final> ') and nome like '% <nome parcial> %'

"Quando estou fraco, aí então é que sou Poderoso"
   
Analista
CÁCERES
MT - BRASIL
ENUNCIADA !
Postada em 25/02/2006 06:38 hs            
Ok, vou testar e depois digo se deu serto..
 
Muito obrigado, atá mais.
 
Luciano
   
Analista
CÁCERES
MT - BRASIL
Postada em 25/02/2006 20:12 hs            
Caro amigo, o código que vc me passou ñ deu certo, segue abaixo o código que uso no campo nome no evento change, porém quero fazer essa referida consulta, e depois siltrar esse mesmo cliente em um determinado período.
 
Data1.RecordSource = "SELECT * FROM LançCruze WHERE Nome Like '*" & Nome.Text & "*'order by DtCadastro desc"
 
Desde já agradeço..
 
um abraço.
 
Luciano
     
clins
NILÓPOLIS
RJ - BRASIL
ENUNCIADA !
Postada em 25/02/2006 21:27 hs            
Aproveitando o código acima...

Data1.RecordSource = "SELECT * FROM LançCruze WHERE Nome Like '*" & Nome.Text & "*' " AND DtCadastro BETWEEN #" & _
    Format(DtInicial, "yyyy/mm/dd") & "# and #" & Format(DtFinal, "yyyy/mm/dd") & _
"# order by DtCadastro desc"

CLins
******************************************************
O sol nasceu para todos, a sombra só para quem merece.
Se sua dúvida foi respondida,encerre o tópico.  
   
Analista
CÁCERES
MT - BRASIL
Postada em 25/02/2006 22:59 hs            
Deu erto..
muito obrigado a todos que me ajudaram...
tenham um bom carnaval, mas lembre-se de curtir com sabedoria e muita saúde.
Um grande abraço..
 
Luciano
     
Página(s): 1/1    

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