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

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Como utilizar o crystal com o VB?
Tamanini
não registrado
Postada em 09/03/2005 11:34 hs   
Estou com dúvidas em como utilizar corretamente o crystal nos meus projetos, tipo:
Quais dll e ocx devo utilizar?Bastaria essas ou não precisa de todas essas?
'##############################
'Dll que será utilizadas:
'components:
'Crystal Reports ActiveX report viewer
'Crystal Reports print control type library

'references:
'Crystal Reports activeX designer Run Time library
'Crystal Reports activeX designer design and RunTime library
'Crystal Reports Report viewer
'Crystal Reports Print Control type library
'##############################
E para adicionar no meu projeto um relatorio tenho que criar um arquivo .rpt e adiciono este dentro de um .dsr(designer report) e insiro o componente de visualização(crviewer) e faço a chamada no form_load():
'
CRViewer1.ReportSource = RptLembretes
RptLembretes.Database.Tables.Item(1).Location = App.Path & "BDdados.mdb"
CRViewer1.ViewReport
'
Correto? Ou tem algum processo mais rápido e melhor?
E por último, sempre será duas folhas que será impresso, dá para montar em apenas um arquivo .rpt essas duas folhas ou, tenho que fazer dois arquivos .rpt?

Obs.: Eu já li um manual do usuário do crystal 8, mas estas coisas ele não explica em como utilizar no VB e eu estou utilizando o crystal 10.

[]'s,
Marcelo Tamanini
     
cyber loc
OURINHOS
SP - BRASIL
Postada em 09/03/2005 13:39 hs            
Na Barra de Ferramentas do VB (click com o botão direito e escolha "Components".
Vai aparecer uma janela. Escolha "Crystal Report Control"
Aparecerá um ícone na Barra de Ferramentas. É só inserir o ícone no Form.
Em Proprieties escolha "ReportFileName" e informe o caminho do arquivo RPT.
Crie um CommandButtom e digite o seguinte comando: CrystalReport1.Action = 5
Pronto! Toda vez que vc clicar no botão o relatório imprime.
     
Tamanini
não registrado
Postada em 09/03/2005 14:34 hs   
OK, mas como estou utilizando o crystal 10, não tem esse "crystal report control", ou melhor, tem, mas é do crystal 4.6 e naum 10.
     
Sandro
não registrado
Postada em 10/03/2005 15:11 hs   
Olá Tamanini,
 
Você precisa usar o Crystal Report Viewer Control (CRViewer) e a biblioteca Crystal Reports Activex Designer Run-Time Library (CRAXDRT).
Coloque o CRViewer em um formulário separado que deverá ser chamado para exibir o seu relatório. O código que você precisa para disparar o relatório é o seguinte:
 
'Seção Declarations
Dim RptApp as CRAXDRT.Application
Dim RptObj as CRAXDRT.Report
 
'Procedure de relatório
Set RptApp = New CRAXDRT.Application
Set RptObj = RptApp.OpenReport(<nome do seu relatório>)
 
RptObj.ReadRecords
CRViewer1.ReportSource = RptObj
CRViwer1.ViewReport
 
a grande vantagem dessa abordagem, é que você não precisa usar o Designer do Crystal no VB, que fixa o seu relatório dentro do programa. Desta forma os seus relatórios e o seu programa se tornam independentes, podendo assim, o programa estar em um diretório e os relatórios em outro, por exemplo.
 
Um abraço,
Sandro.
     
Tamanini
não registrado
Postada em 11/03/2005 10:35 hs   
No meu caso eu vou ter sempre duas folhas para impressão, eu terei que criar dois arquivos .rpt e chamar os dois ao mesmo tempo para visualizar a impressão, ou tem como deixar as duas folhas em apenas um arquivo .rpt e como faria?
Outra dúvida, só como curiosidade, o que seria o componente RDC e RAS, neste seu exemplo no caso estaria usando algum deles?

[]'s,
Marcelo Tamanini
     
Rochª
Pontos: 2843 Pontos: 2843 Pontos: 2843
RIO DE JANEIRO
RJ - BRASIL
Postada em 11/03/2005 10:52 hs            
Tamanini
use subrelatorio aqui no forum tem dicas.
 
Voce cria dois relatorios distintos e coloca em um unico. Facil facil.Emoções

__________________________________________________________________________
Qualquer coisa post
 
Emoções
Rochª
     
Página(s): 1/2      PRÓXIMA »


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