Cystal report e vb net

giovedì 08 aprile 2010 - 14.55

Elenco Threads

Stanze Forum

Aggiungi ai Preferiti

Cerca nel forum

maxway Profilo | Newbie

13 messaggi | Data Invio: gio 8 apr 2010 - 14:55

Ho provato a fare da principiante un programma in vb .net 2008 di gestione dei costi di produzione
Devo stampare il report scheda prodotto che si chiama CrystalReport1.rpt

Devo passare al campo parametro insprodotto il valore contenuto nella idprodottotextbox

Ho provato di tutto ma mi dice che non ha un'istanza di oggetto.

Potete aiutarmi con la sintassi corretta?

Grazie
Massimiliano

tonyexpo Profilo | Senior Member

229 messaggi | Data Invio: gio 8 apr 2010 - 15:54

ciao

puoi postare un po di esempi di come usi il report e come gli passi i parametri?

Antonio Esposito
MCPD, MCTS, MCP

http://blogs.dotnethell.it/espositos

maxway Profilo | Newbie

13 messaggi | Data Invio: gio 8 apr 2010 - 17:41

1325_winprod.zip

Spero che sia abbastanza chiaro
io non so neanche cosa vuol dire l'errore
Grazie
Massimiliano

alsatan Profilo | Newbie

32 messaggi | Data Invio: ven 9 apr 2010 - 08:40

Ciao, visto che andhe io sono piuttosto un niubbone di Crystal Report, ma almeno qualcosa sono riuscito a concludere cerco di aiutarti volentieri, anche se dovresti cercari di capire e studiare alcune cose prima di iniziare a buttare giu del codice.

Cmq ti do un esempio

Hai il tuo form in VB nell esempio sara il FORM1, inserisci dentro il FORM un oggetto di tipo CrystalReportViewer, nell'esempio il mio si chiama CrystalReportViewer1.

Nelle prime righe del FORM inserisci

Imports CrystalDecisions
Imports CrystalDecisions.Shared
Imports CrystalDecisions.CrystalReports
Imports CrystalDecisions.CrystalReports.Engine

Poi mettiamo l'esempio che vuoi caricare il report subito appena apri il form:

 Il codice sorgente non è stato renderizzato qui
perchè non c'è sufficiente spazio.
Clicca qui per visualizzarlo in una nuova finestra

Immagino che se gli passi l'id da una textbox poi caricherai il report dopo il click di un bottone quindi il codice dovrai metterlo nell'evento click del bottone anzichè nel LOAD come ho fatto io.

Naturalmente essendo neofita anche io, probabilmente il mio codice non è perfetto, ma funziona :) nell'attesa che ti risponda qualcuno più PRO di me, spero che questo ti dia una mano

ciau :)

freeteo Profilo | Guru

6.542 messaggi | Data Invio: ven 9 apr 2010 - 16:48

Ciao,
se vuoi un esempio puoi prendere quello che trovi qui, è in C# ma convertirlo in vb.net non è molto difficile.
http://www.dotnethell.it/articles/Crystal-Reports-Integration-Windows-Form.aspx

come vedi in quell'esempio viengono usate tutte le tecniche possibili (o quasi) per passare i dati al report che vengano visualizzati poi dentro all'applicazione, e sul finale viene messo anche il passaggio del parametro (metodo SetParameter(...))

Ciao.

Matteo Raumer
[MCAD .net, MVP Visual C#]
http://blogs.dotnethell.it/freeteo

maxway Profilo | Newbie

13 messaggi | Data Invio: gio 22 apr 2010 - 01:13

Il problema sembrerebbe risolto; se ci sono altri problemi mi rifaccio sentitre
Grazie
Massimiliano

freeteo Profilo | Guru

6.542 messaggi | Data Invio: gio 22 apr 2010 - 11:20

>Il problema sembrerebbe risolto;
come hai risolto? posta la soluzione, almeno a grandi linee...poi se hai trovato utile qualche risposta accettala così chiudiamo il thread.
Grazie.

>se ci sono altri problemi mi
>rifaccio sentitre
certo, siamo sempre qui.

Ciao.

Matteo Raumer
[MCAD .net, MVP Visual C#]
http://blogs.dotnethell.it/freeteo

maxway Profilo | Newbie

13 messaggi | Data Invio: gio 22 apr 2010 - 17:01

Private Sub Button1_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles Button1.Click

Dim cryRpt As New ReportDocument
cryRpt.Load("c:\CrystalReport1.rpt")

Dim crParameterFieldDefinitions As ParameterFieldDefinitions
Dim crParameterFieldDefinition As ParameterFieldDefinition
Dim crParameterValues As New ParameterValues
Dim crParameterDiscreteValue As New ParameterDiscreteValue

crParameterDiscreteValue.Value = TextBox1.Text
crParameterFieldDefinitions = cryRpt.DataDefinition.ParameterFields
crParameterFieldDefinition = crParameterFieldDefinitions.Item("[insprodotto]")
crParameterValues = crParameterFieldDefinition.CurrentValues

crParameterValues.Clear()
crParameterValues.Add(crParameterDiscreteValue)
crParameterFieldDefinition.ApplyCurrentValues(crParameterValues)

CrystalReportViewer1.ReportSource = cryRpt
CrystalReportViewer1.Refresh()
End Sub

ecco il codice risolutivo
grazie ancora
Massimiliano

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 !