Crystal report / VB.net, passage de variable

Question

Bonjour,

Je voudrais créer un champ dans Crystal Reports, contenant une variable (nomsociete) que j'initialise dans vb.net :

dans vb.net : nomsociete=depart.nomsociete

Pour lancer mon état :

        oRpt = New ReportDocument
        oRpt.Load(Depart.NomEtat)
        Me.CrystalReportViewer1.ReportSource = oRpt

Avez-vous une idée ?

Merci

anne37

cs_gazza · Answer

Bonjour aurait tu une solution pour afficher une variable dans un crystal report

je m'explique, j'ai une variable titre et j'aimerai l'afficher dans mon report... comment faire????

ManuAntibes · Answer

Bonjour 

Avez vous trouvé des solutions, car cela m'interesse aussi.

Merci de poster vos trouvailles.

MANUANTIBES [:p]

cs_anne37 · Answer

cs_superzak1 · Answer

Bonjour

Si Avez vous trouvé des solutions, car cela m'interesse aussi.

Merci de poster vos trouvailles.


Merci d'avance [:p]

ingito · Answer

Bonjour
tu efface tou
Essaye ce code dans le formulaire qui contient ton viewreport 
Private Sub Form_Load()
Dim CrAppl As New CRAXDRT.Application
Dim CrRep As New CRAXDRT.Report
Dim Con As ADODB.Connection
Dim AdoRs As New ADODB.Recordset
Set AdoRs =  New ADODB.Recordset
 'connexion à ta base de donnée acces 
Set Con  = New ADODB.Connection
Chemindata =  "chemin de ta base de donnée acces"
Con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source = '" & Chemindata & "'"
Con.Open
 'paramétrage de ton cristal report 
AdoRs.Open " select * from ta_table where ton_champ  =" & variable, Con
chemin="le chemin de tafeuille cristal report"        
Set CrRep = CrAppl.OpenReport(chemin)
        CrRep.Database.Tables(1).SetDataSource AdoRs, 3
        Screen.MousePointer = vbHourglass
        CRViewer91.ReportSource = CrRep
        CRViewer91.ViewReport
        Screen.MousePointer = vbDefault
End Sub
Private Sub Form_Resize()
CRViewer91.Top = 0
CRViewer91.Left = 0
CRViewer91.Height = ScaleHeight
CRViewer91.Width = ScaleWidth
CRViewer91.Zoom 100
End Sub

Crystal report / VB.net, passage de variable

5 réponses

Discussions similaires