|
|
|
![]() |
|
Strumenti |
![]() |
#1 |
Senior Member
Iscritto dal: Feb 2003
Messaggi: 2805
|
[VB.NET] Passare una foto a CrystalReport
Ho la mia form con il viewer a cui ho agganciato un report di CrystalReport
Per importare i dati al report glielo passo tramite i valori presenti nella form, senza usare nessun database vi faccio vedere l'esempio, qui sotto Cosi facendo riesco PERFETTAMENTE a passargli i dati. --------------------------------------------------- Private Sub frmStampaCliente_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load Dim rpt As New rptStampaCliente rpt.SetParameterValue("Nominativo", frmStampaCliente.txtNominativo.Text) rpt.SetParameterValue("DataNascita", frmStampaCliente.txtDatadiNascita.Text) rpt.SetParameterValue("Sesso", frmStampaCliente.lblRiepilogoSesso.Text) rpt.SetParameterValue("Indirizzo", frmStampaCliente.txtIndirizzo.Text) rpt.SetParameterValue("Cap", frmStampaCliente.txtCap.Text) rpt.SetParameterValue("Città", frmStampaCliente.txtCittà.Text) rpt.SetParameterValue("Provincia", frmStampaCliente.txtProvincia.Text) rpt.SetParameterValue("Telefono", frmStampaCliente.txtTelefono.Text) rpt.SetParameterValue("Cellulare", frmStampaCliente.txtCellulare.Text) rpt.SetParameterValue("Email", frmStampaCliente.txtEmail.Text) rpt.SetParameterValue("DataIscrizione", frmStampaCliente.cmbDataPrimaIscrizione.Text) CrystalReportViewer1.ReportSource = rpt CrystalReportViewer1.Show() End Sub ------------------------------------------------------- Ora ho anche la foto da inserire. Se metto una immagine e faccio rpt.SetParameterValue("Foto", frmStampaCliente.PBFoto.Image) non funziona. Come posso passargli la foto???? Ciao e grazieeeeeeee
__________________
AMD 3700x --- ASUS X570 CROSSHEAR VIII HERO --- 4x 8GB Corsair Vengeance RGB PRO 3600 MHz --- SSD: Samsung 980Pro 1TBb --- EVGA RTX 2070 SUPER |
![]() |
![]() |
![]() |
#2 |
Senior Member
Iscritto dal: Feb 2003
Messaggi: 2805
|
Nessun
Nessuno sa aiutarmi????
Ciao e grazieeeeeee
__________________
AMD 3700x --- ASUS X570 CROSSHEAR VIII HERO --- 4x 8GB Corsair Vengeance RGB PRO 3600 MHz --- SSD: Samsung 980Pro 1TBb --- EVGA RTX 2070 SUPER |
![]() |
![]() |
![]() |
Strumenti | |
|
|
Tutti gli orari sono GMT +1. Ora sono le: 21:50.