Bonsoir,
Je désire créer des états avec cristal report.
Concernant les éditions avec une seule table, sa je sais faire.
Après m'être entrainé, j'ai tenté d'en faire avec plusieurs tables mais pas moyen ...

j'ai testé ma requête dans le "query builder" et cette requête me retourne le bon résultat. par contre dans le crystalreportviewer je n'ai aucune donnée...

Voici mon code :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
 Private Sub imprimer_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles imprimer.Click
        Dim Report As New ReportDocument
        Dim Dataset1 As New DataSet
        Dim Conn As New SqlClient.SqlConnection("server=192.168.0.16\SQLEXPRESS;Initial Catalog=XXXXXXX;User Id=XXXXXX; password =XXXXXX ;")
        Dim Dadap As New SqlClient.SqlDataAdapter("SELECT dossier.num_dossier, dossier.nom_client, dossier.prenom_client, dossier.date_adhesion, activite.lib_activite, regime.lib_regime, agence.lib_agence FROM dossier INNER JOIN activite ON dossier.code_activite = activite.code_activite INNER JOIN regime ON dossier.code_regime = regime.code_regime INNER JOIN agence ON dossier.code_agence = agence.code_agence WHERE (agence.lib_agence = '" & combo_agence.Items.ToString & "')", Conn)
        'ici on charge le rapport
        Report.Load("F:\XXXX\XXXX\XXXX\Resources\etat_adhesion_annee_par_bureau.rpt")
        Try
            'ici on charge le dataset
            Dadap.Fill(Dataset1, "dossier, agence, regime, activite")
            'On modifie la source de données
            Report.SetDataSource(Dataset1)
            'cas de la visualistaion dans le reportview
            crvETAT.ReportSource = Report
        Catch ex As Exception
            MessageBox.Show(ex.Message, ex.Source, MessageBoxButtons.OK)
        End Try
    End Sub

Merci d'avance de vos réponses !!!!