Discussion :

[SALIA LOUA OLIVIER]

Bonjour à tous

je viens vers vous une fois de plus en esperant trouver solution a mon probleme.
en effet je fais une application sur vb.net 2005 et je voudrais faire des etats avec crystal report. mon probleme est que ma requete attent 4 parametres pour s'afficher pour cela j'utilse une winform pour passer ces parametres mais je ne sais pas comment ecrire le code pour passer les parametres.

j'epere que aurez compris ma demande

bien à vous

[nabilfaouzi]

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
20
21
22
23
24
25
26
27
28
29
30
31
32
Dim p, p1 As New ParameterField
        Dim ps As New ParameterFields
        Dim pd, pd1 As New ParameterDiscreteValue
        CrystalReportViewer1.Refresh()
       If c.State = ConnectionState.Closed Then
            c.Open()
        End If
        cr.Load(Application.StartupPath & "\\etat.rpt")
        cmd.CommandText = "requeteavecparametre"
        cmd.Connection = c 
        cmd.Parameters.AddWithValue("@num", ComboBox2.SelectedValue)//exemple parametres
        cmd.Parameters.AddWithValue("@affaire", Val(ComboBox1.SelectedValue))
//affectation des valeur pour associer aux états
        pd1.Value = Val(ComboBox2.SelectedValue)
        pd.Value = Val(ComboBox1.SelectedValue)
//le nom des parametre dans crystal report
        p1.Name = "c"
        p.Name = "a"
 
        p1.CurrentValues.Add(pd1)
        p.CurrentValues.Add(pd)
 
        ps.Add(p1)
        ps.Add(p)
 
        CrystalReportViewer1.ParameterFieldInfo = ps
        Dim dae As New SqlDataAdapter
  //donnez la structure de la tables à imprimer pour la ds
        dae.Fill(ds, "Etat")
        cr.SetDataSource(ds.Tables("Etat"))
        CrystalReportViewer1.ReportSource = cr 
        cmd.Parameters.Clear()

Voici le code que j'utilise j'espere que ça vous aidera, n'oublie pas d'importer les espaces des noms suivant:
Imports CrystalDecisions.ReportSource
Imports CrystalDecisions.Windows.Forms
Imports CrystalDecisions.CrystalReports.Engine
Imports CrystalDecisions.Shared
je pense tu les ajoute depuis l'onglet Projet/Ajouter une référence et tu parcours sur les fichier dll. Bonne chance.

[SALIA LOUA OLIVIER]

merci a vous
je vais essayer la solution proposer et vous tenir informer