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

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  [Conexão] Crystal !!
Love Gun®
SÃO MANUEL
SP - BRASIL
ENUNCIADA !
Postada em 12/09/2004 16:48 hs            
Olá pessoal !
Estou enfrentando um problema bem chato....
Até sempre trabalhei com o Crystal conectando com um servidor DSN...
 
Mas agora estou desenvolvendo um programinha, que tem a base de dados em um arquivo chamado banco.MDB
 
Através desse arquivo (que é o banco de dados) eu quero geral um relatório dos clientes.
Mas não sei como filtrar meu relatório por cidade dos clientes !
 
Estou usando assim:
CrystalReport1.ReportFileName = App.Path + "Clientes.rpt"
CrystalReport1.SelectionFormula = "{Clientes.Cidade} = '" & Label4.Caption & "'"
CrystalReport1.Action = 1
CrystalReport1.PageZoom (100)
 
Mas só que ele não filtra, e quando clico no botão REFRESH do Crystal, ele 'zera' meu relatório
 
Não sei se fui bem claro, mas espero que vc's entendam...
Muito obrigado !
 
Abraços !
Thiago Cartoni
TÓPICO EDITADO
 
Alê
SÃO PAULO
SP - BRASIL
ENUNCIADA !
Postada em 13/09/2004 09:29 hs         
Olá Thiago,
 
tente substituir a instrução:
CrystalReport1.SelectionFormula = "{Clientes.Cidade} = '" & Label4.Caption & "'"
por esta:
CrystalReport1.RecordSelectionFormula = "{Clientes.Cidade} = '" & Label4.Caption & "'"
Espero que funcione.
 
Um abraço.
   
DennysFelix
SÃO PAULO
SP - BRASIL
ENUNCIADA !
Postada em 13/09/2004 10:03 hs            
RecordSelectionFormula - PARA USAR ESSE EVENTO VC PRECISA ESTAR USANDO O CRViewer...........E PELO COMPONETE QUE ESTA ESCRITO AQUI NÃO SERA PERMITIDO CrystalReport1
 
TENTE FAZER ASSIM
CrystalReport1.SelectionFormula = "{Clientes.Cidade} = "& Label4.Caption
   
Brexuega
Pontos: 2843
VISEU
PT - PORTUGAL
ENUNCIADA !
Postada em 13/09/2004 20:09 hs            
talvez precise de fazer o seguinte:
CrystalReport1.DataFiles(0) = app.path & "anco.mdb"
CrystalReport1.ReportFileName = App.Path + "Clientes.rpt"
CrystalReport1.SelectionFormula = "{Clientes.Cidade} = '" & Label4.Caption & "'"
CrystalReport1.Action = 1
CrystalReport1.PageZoom (100)

Quando a Sua Dúvida For Esclarecida Encerre o Post
¥ ADS
   
Página(s): 1/1    


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