Interagire crystal report con VBA

martedì 16 agosto 2005 - 21.05

Elenco Threads

Stanze Forum

Aggiungi ai Preferiti

Cerca nel forum

leonline Profilo | Newbie

10 messaggi | Data Invio: mar 16 ago 2005 - 21:05

Ciao a tutti! Vorrei se possibile chiedervi un aiuto.
Sono alle prime arme con CRYSTAL REPORT, sapete dirmi come faccio a scrivere il codice sotto visual basic che mi permete di caricare il report? oppure per mandargli un parametro ID, per poi visualizzare i corrispettivi dati ad esso associato in amteprima? Ho guardato un po in giro, solo che i vari tutorial sono o abbastanza complessi oppure inutili al mio semplice problema. Premeto che creare il report xme non un problema! il mio semplice problema è installarlo sotto VBA.(Librerie dll)

Uso crystal report 10 e VBA 6.0 Profesional.
Mi potete indicare dove posso trovare un buon tutorial, sopratutto su come usare i vari commandi in VBA come ad es. scrivere una formulas ecc.

Rimango in attesa di una vostra gentilissima risposta. Grazie
Leonline

freeteo Profilo | Guru

6.542 messaggi | Data Invio: mar 23 ago 2005 - 17:12

ciao,
sinceramente con vba di office diciamo non l'ho maiutilizzato, cmq non penso sia molto differente da vb6 classico, guardati cmq il sito dove trovi tutto (in inglese):
http://support.businessobjects.com/

ciao

Matteo Raumer
.net addicted :-)
http://blogs.dotnethell.it/freeteo

leonline Profilo | Newbie

10 messaggi | Data Invio: gio 25 ago 2005 - 00:08

Ciao TEO, grazie per avermi risposto.
Forse hai capito male una cosa: Ho chiesto come si puo scrivere un codice sotto Visual basic(Classico) che si connette ad un report esterno. Comunque ho già risolto il problema. Visto che siete stati cosi gentili ora ve lo mando:

Es. Codice VBA che permette di connettere ad un report progettato con Crystal Report 10:

1. Installare le libreria ocx. CRVIEWER, Crystal Report
2. Attivare il rifferimento Crystal report activex designer Run time Library 10.0
3. Mettere i due controlli (CRVIEWER, CRYSTAL REPORT DESIGNER) sulla maschera, poi scrivere il seguente codice.

Nota: Questo esempio consente tramite un pulsante ed una casella di testo di ricercare un ricord nel report.

Option Explicit
Dim crxApp As New CRAXDRT.Application
Dim crxRpt As CRAXDRT.Report

Private Sub Command1_Click()
Dim AA As String

crxRpt.DiscardSavedData
CRVIEWER.ReportSource = crxRpt
AA = Text1.Text '<<<<< Memmorizzo il valore della casella di testo alla variabile AA
crxRpt.RecordSelectionFormula = "{NomeTabella.NomeRecord}= '" & AA & "'"
CRVIEWER.ViewReport
CRVIEWER.Zoom (90)
End Sub

Private Sub Form_Load()
Set crxRpt = Nothing
Set crxRpt = crxApp.OpenReport("C:\NomeDelReport.rpt")
End Sub

Ciaooo.

freeteo Profilo | Guru

6.542 messaggi | Data Invio: gio 25 ago 2005 - 00:20

ottimo lavoro!
l'unica pecca? non è dot net ;-)

ciao

Matteo Raumer
.net addicted :-)
http://blogs.dotnethell.it/freeteo

leonline Profilo | Newbie

10 messaggi | Data Invio: gio 25 ago 2005 - 00:38

Lo so, e hai ragione!l'ho trovat in giro poi l'ho adattato al mio codice e semplificato.
L'importante è che lo avete apprezzato, e che possa essere d'aiuto a qualkuno.

cubalibre Profilo | Newbie

2 messaggi | Data Invio: mer 22 nov 2006 - 18:07

Perchè una cosa per essere valida deve essere per forza dor net?

Spiegatemelo e convertitemi a dot net.

Nico

Torna su

Stanze Forum

Elenco Threads

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 !