Bonsoir le forum

J'arrive à ouvrir un rapport crystal report a partir de mon application en VB6 grace à ce code :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
Dim CrAppl As New CRAXDRT.Application
Dim CrRep As New CRAXDRT.Report
Dim path As String
    path = "c:\..."
    Set CrRep = CrAppl.OpenReport(path & "Report2.rpt", 1)
 
    CrRep.Database.Tables(1).SetDataSource rstResultat8, 3
    dbsBase.Close
    Screen.MousePointer = vbHourglass
    CRViewer1.ReportSource = CrRep
    CRViewer1.ViewReport
    Screen.MousePointer = vbDefault
Dans ce cas il va m'affficher le rapport telquel. (dans mon cas, ce sont des factures, donc il va imprimer toutes les factures qui sont dans ma base de donnée)
Ce que je souhaiterais, c'est de pouvoir faire une selection sur le numéro de facture.
Dans mon cas, je veux imprimer seulement la facture 1 par exemple, celle ci correspond a une labeltext qui se trouve dans ma form

Comment puis-je faire
Avez la solution ?

Merci d'avance