Crystal Report XI & Vb6

giovedì 05 giugno 2008 - 12.48

padronfrodo88 Profilo | Junior Member

Buongiorno ragazzi...!!
sono ritornato ad un punto mordo del mio programma....
il problema è il seguente...
ho installato crystal report XI e volgio farlo inetragire con vb6... ma il problema è:
1. Come faccio a farlo interagire;
2. in vb6 non riesco a trovare le seguenti librerie e componenti:
- progetto -> riferimenti -> Crystal Report Active X Designer Run Time 11.0
- progetto-> componenti-> Crystal Active X Report Viewer Library 11
per poi fare questo codice:
Dim crViewer As CrystalActiveXReportViewer
With crViewer
.Visible = True
.ReportSource = "C:\test_report.rpt"
.ViewReport
.Zoom 100
End With
Qulcuno sa dirmi qualcosa a riguardo?sono veramente in CRISI accetto di tutto codice guide link su internet...

Michele

Aeghé Profilo | Newbie

Prova a fare ciò che ti scrivo se possiedi VB 6 e Crystal Report XI:
1) Dal menù principale>> Progetto >> Riferimenti
2) clicca si Sfoglia e, con installazione di default, C\Programmi\Business Objets\Common\3.5\Crystalreportviewers115\ActiveX Controls
3) selezionare il File CRViewer.dll
4) fai lo stesso del punto 2) solo che nel percorso, dopo la cartella 3.5 continua con \bin
5) selezionare un file alla volta: craxddrt.dll e craxdrt.dll
6) selezionare tutti i riferimenti indicanti Crystal Report ....
7) uscire dalla finestra Riferimenti
8) Dal Menù principale>> Progetto >> Componenti >> oggetti inseribili: seleziona Crystal ActivX Report Viewer
9) Selezione lo stesso nome del punto 8) in controlli

N.B.: ho scritto prova perché ho eseguito la stessa procedura nel mio portatile e nel PC Desk col risultato che in uno funziona perfettamente, mentre nell'altro ci sto ancora combattendo per farlo funzionare.

padronfrodo88 Profilo | Junior Member

ciao ho appena installato crystal report XI Relase 2, ora volio interagire con crystal cioè volgio dare al report dei specifici parametri dove posso creare report dinamici...cioè che alla base hanno una query... questo lo facevo grazie ad un ocx con cr8 ora con l'11 come posso fare?grazie ancora per l'aiuto...
Michele

Aeghé Profilo | Newbie

VB6 e Crystal Report XI
Scheda impostazioni per la stampa di dati selezionati.

Premessa:
ho costruito un form “universale” che posso usare in tutti i programmi dove si chiede di stampare qualsiasi lista di dati, sia essa completa che filtrata da query.

E’ necessario che il form (UniStampe) abbia tre pulsanti che io ho chiamato:
1) cmd3dStampa
2) cmd3dVideo
3) cmd3dUscita
4) il componente CristalActiveXReportViewer (CRViewer1)

Il form viene attivato da un altro form attraverso la chiamata
UniStampe.Show 1

A questo form devono essere inviate variabili stringa globali quali:
1) NomeFile = nome del percorso, compreso il nome del report
2) NomeFormula = la stringa in linguaggio SQL per un eventuale filtro query

Il form UniStampe deve essere inizializzato col seguente cod. prg:
Generale
Dim crAPP As New CRAXDRT.Application
Dim Report As CRAXDRT.Report

Seguono i seguenti cod. prg.
Form – Activate
Set crAPP = New CRAXDRT.Application
Set Report = crAPP.OpenReport(NomeFile)

cmd3dStampa - Click
CRViewer1.ReportSource = Report
Report.RecordSelectionFormula = NomeFormula
CRViewer1.Refresh
CRViewer1.PrintReport
cmd3dUscita_Click

cmd3dVideo – Click
UniStampe.Height = Screen.Height
UniStampe.Width = Screen.Width
CRViewer1.Visible = True
CRViewer1.Height = Screen.Height - 525
CRViewer1.Width = Screen.Width - 1635
Left = (Screen.Width - Width) / 2 ' Centra il form orizzontalmente.
Top = (Screen.Height - Height) / 2 ' Centra il form verticalmente.
CRViewer1.ReportSource = Report
Report.RecordSelectionFormula = NomeFormula
CRViewer1.Refresh
CRViewer1.ViewReport

cmd3dUscita – Click
Set Report = Nothing
Set crAPP = Nothing
Unload UniStampe

Buon lavoro

Aeghé vi saluta!

padronfrodo88 Profilo | Junior Member

Ho provato a fare quello che tu mi hai detto... l'unico problema è che quando scarico il form mi si chiude l'ambiente di sviluppo (VB6)
come sistema operativo ho un windows vista...!!
cosa se puo fa?
Michele

Aeghé Profilo | Newbie

Windows Vista non è la causa

Il form chiamato UniStampe deve essere chiamato da un altro form in cui, ad esempio, vi può essere un pulsante stampe in cui, oltre ed esservi le variabili necessarie d'impostazione (NomeFile e NomeFormula) vi sarà il richiamo del form UniStampe e cioé:
UniStampe.show 1
E' importante il numero 1 dopo il comando UniStampe.show poiché richiama il form delle stampe come modale cioé in modo transitorio e, quando si esce da tale form, l'azione ritorna sul form precedente dove vi era il pulsante stampe.
Spero di essere stato chiaro.
Aeghé vi saluta!

padronfrodo88 Profilo | Junior Member

ciao...ho provato a fare come tu mi hai detto...ma non funziona... mi chiude tutto l'ambiente di sviluppo... non so più cosa fare....!! alcuni miei colleghi mi dicono che windows visa non può digerire il viewer di crystal report... ma a me sinceramente sembra molto strano...!! vabbè attendo tue informazioni...grazie
Michele

Aeghé Profilo | Newbie

Purtroppo, o per fortuna, io ho montato ancora Windows Xp SP3.
Per darti una risposta sicura, dovro cercare un amico che avvia il W. Vista e provare; poi ti saprò dire...
Abbi fede.
Aeghé vi saluta!
Partecipa anche tu! Registrati!
Hai bisogno di aiuto ?
Perchè non ti registri subito?

Dopo esserti registrato potrai chiedere
aiuto sul nostro Forum oppure aiutare gli altri

Consulta le Stanze disponibili.

Registrati ora !
Copyright © dotNetHell.it 2002-2025
Running on Windows Server 2008 R2 Standard, SQL Server 2012 & ASP.NET 3.5