Discussion :

[charlesxxxx]

Bonjour/soir voici mon bout de code

Code :

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

1
2
3
4
5
6
7
'Pour chaque items cocher on imprime et archive
                For Each checkeditems In ClbPdf.CheckedItems
                    Dim p As New Process
                    p.StartInfo.Verb = "print"
                    p.StartInfo.FileName = CheminPdf + checkeditems
                    p.StartInfo.Arguments = CbxImprimante.SelectedItem
                    p.Start()

Je cherche simplement à imprimer des pdf (qui sont déjà convertie) sur une des imprimante qui sont stocker dans une combo box.
J'ai lu qu'on pouvait le faire comme sa, ce code n'affiche pas d'erreur mais ne fait rien du tout, le pire est que j'ai finit entièrement mon projet qui je trouve qu'il a de la gueule.

Merci d'avance.

[charlesxxxx]

Voici donc la solution trouver:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Pour chaque items cocher on imprime
                For Each checkeditems In ClbPdf.CheckedItems
                    Dim p As New Process
                    p.StartInfo.UseShellExecute = True
                    p.StartInfo.Verb = "PrintTo"
                    p.StartInfo.FileName = CheminPdf + checkeditems
                    p.StartInfo.Arguments = CbxImprimante.SelectedItem
                    p.StartInfo.CreateNoWindow = True
                    p.StartInfo.WindowStyle = ProcessWindowStyle.Minimized
                    p.Start()
                Next

Pour détailler un peu plus je suis en stage et on ma demander de créer un logiciel qui imprime des pdf et qui les archives a la suite.