Bonjour, à tous,
j'essaie d'imprimer des étiquettes en utilisant VB.net et Crystal Report. Mon problème se situe lors de l'impression de plusieurs étiquettes.
Si je demande l'impression de 3 étiquettes, il imprimera 3 fois la première étiquette. En installant un "aperçu avant impression" via Crystalreport viewer, je visualise bien mes 3 étiquettes. Mais en lançant l'impression par cet aperçu, j'obtiens toujours 3 fois la première étiquette.
Si quelqu'un aurait une piste où chercher, merci d'avance, voici le code utilisé.
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 Dim tableau_Gal As dstEtiquette.DataTableGalDataTable = dataset_impression.Tables("DataTableGal") Dim rapport_Gal As New rptGal Dim Data_a_imprimer As DataTable Dim vue As DataView vue = New DataView(tableau_Gal) For i = 1 To nb_Etiquettes 'Remplissage des champs pour chaque étiquette' ... rowimpressionGal("Rex") = num_OF & i.ToString rowimpressionGal("CBRex") = Outil.Code128("S" & num_OF & i.ToString) tableau_Gal.Rows.Add(rowimpressionGal) Next 'Impression' Data_a_imprimer = vue.ToTable rapport_Gal.SetDataSource(Data_a_imprimer) rapport_Gal.PrintOptions.PrinterName = imprimante rapport_Gal.PrintToPrinter(1, False, 0, 0) vue.Dispose() tableau_Gal.Clear() vue = Nothing
Partager