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

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  CRViewer?? alguem?
~Ð@®£@Ñ
Pontos: 2843 Pontos: 2843 Pontos: 2843
PELOTAS
RS - BRASIL
ENUNCIADA !
Postada em 19/08/2006 00:36 hs            
estou retirando a .ocx do crystal 8.5
e trazendo para a versao 10 CRViewer

encontrei esse codigo na web, mas quais as referencias necessarias? alguem sabe?


Dim crApp As New CRAXDRT.Application
Dim crRpt1 As New CRAXDRT.Report
Dim crRpt2 As New CRAXDRT.Report
Dim crRptRouter As New ReportSourceRouter


Set crRpt1 = crApp.OpenReport(App.Path & "
elatorio
el1.rpt")
Set crRpt2 = crApp.OpenReport(App.Path & "
elatorio
el2.rpt")

crRptRouter.AddReport crRpt1
crRptRouter.AddReport crRpt2

crp2.ReportSource = crRptRouter
crp2.ViewReport
   
Página(s): 1/1    

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