Discussion :

[lorax]

J'arrive à imprimer un bulletin, mais pour générer à la fois plusieurs bulletins (d'une classe) dans un seul état CR, je n'y arrive pas depuis quelques jours.

Cordialement.

[lorax]

J'arrive à imprimer un bulletin, mais pour générer à la fois plusieurs bulletins (d'une classe) dans un seul état CR, je n'y arrive pas depuis quelques jours.

Cordialement.

bjr, je vais essayé d'être un peu plus précis par rapport au poste précendent (en citation)
je developpe une application qui permet de générer des bulletins de notes; pour cela j'utilise VB.net et CrystalReport pour le moment avec cette procédure j'arrive à créer un bulletin par élève lorsque je clique sur le bouton IMPRIMER de mon formulaire "Form_Notes" en voici le code:

imprimé le bulletin dun élève par rapport à un trimestre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
Sub charger_bullpareleve() 
        Dim rprt As New CR_Bulletin
        rprt.SetParameterValue(1, Form_Notes.CB_NiveauNote.SelectedValue)
        rprt.SetParameterValue(3, Form_Notes.cb_trimestre.SelectedValue)
        rprt.SetParameterValue(2, Form_Notes.CBAa_Nte.SelectedValue)
        rprt.SetParameterValue(0, Form_Notes.DGV_Notes.Item(0, Form_Notes.lcnp).Value)
        rprt.SetParameterValue(4, Form_Notes.rang_elve)
        rprt.Parameter_rang.EditMask = Form_Notes.rang_elve
        CrystalRViewer_Bulletin.ReportSource = rprt
    End Sub

et voici le resultat d'un exemple en capture d'écran de l'éleve DIDIER




Mon problème crucial est que pour un clic, je veux générer les bulletins des élèves d'une classe au lieu d'un seul élève et en voici le bout de 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
20
 
Sub charger_bull_classe()
        Dim rprt As New CR_Bulletin
        Dim rprt1 As New CR_Bulletin
        Dim dtr_bullcl As MySqlDataReader
        Dim idelve As Integer
        dtr_bullcl = selectreq("SELECT distinct Nter.id_eleve FROM noter as Nter,inscrire as ins where Nter.id_Aa='" & Form_Notes.CBAa_Nte.SelectedValue & "' and Nter.id_saison='" & Form_Notes.cb_trimestre.SelectedValue & "' and Nter.id_eleve=ins.id_eleve and ins.id_niv='" & Form_Notes.CB_NiveauNote.SelectedValue & "' ")
        While dtr_bullcl.Read
            If dtr_bullcl.IsDBNull(0) = False Then
                idelve = dtr_bullcl("id_eleve")
                MessageBox.Show(idelve)
                rprt.SetParameterValue(1, Form_Notes.CB_NiveauNote.SelectedValue)
                rprt.SetParameterValue(3, Form_Notes.cb_trimestre.SelectedValue)
                rprt.SetParameterValue(2, Form_Notes.CBAa_Nte.SelectedValue)
                rprt.SetParameterValue(0, idelve)
                rprt.SetParameterValue(4, Form_Notes.rang_elve)
                CrystalRViewer_Bulletin.ReportSource = rprt
         End If
   End While
End Sub

ce que je voulais avoir c'est d'avoir une fois les bulletins dans un seul état ou je peu naviguer pour les voirs (un peu de totologie)
jusqu'a là sans succé et je suis bloqué

[luc_chivas]

bonjour,

dans ton état, tu crées un groupe pour l'éléve, et dans ta requete, tu selectionnes la classe et non pas l'élève...

[lorax]

bonjour,

dans ton état, tu crées un groupe pour l'éléve, et dans ta requete, tu selectionnes la classe et non pas l'élève...

Je parviens a voir tous les bulletins en mode "aperçu" lors de la conception. Mais je n'arrives pas toujours a voir cela normalement quand j'execute le programme, je me rends compte que ce toujours le bulletin du dernier èléve de la classe ( niveau d'études) passèe comme paramètres qui apparaît.

[luc_chivas]

pourquoi passes tu l'élève en paramètre, alors que c'est la classe que tu veux.... enlève ce paramètre de ton rapport...

[lorax]

pourquoi passes tu l'élève en paramètre, alors que c'est la classe que tu veux.... enlève ce paramètre de ton rapport...

Ca m'a pris du temps, mais le problème est resolu seulement avec 3 paramètres.
- niveau
- trimestre
- année academique

Thank's LUC_CHIVAS