Bonjour,

Je souhaite imprimer plusieurs PDF à la suite sans interruption, pas d'ouverture d'Acrobat ou autre.

J'ai ce 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
21
22
23
24
25
 
Private Sub print(ByVal chemin As String)
            Dim Printer_Name As String = ""
            Dim pathFile As String = chemin
            Dim Prt_Proc As New Process ' imprime selon l'extension
 
            Try
                Prt_Proc.StartInfo.FileName = pathFile
                '
                ' Selon type de fichier (print OU printTo)
                Prt_Proc.StartInfo.Verb = "PrintTo"
                'Prt_Proc.StartInfo.Verb = "Print"
                '
                ' Prt_Proc.StartInfo.CreateNoWindow = False
                Prt_Proc.StartInfo.Arguments = "" & Printer_Name & """"""
                Prt_Proc.StartInfo.UseShellExecute = True
                Prt_Proc.Start()
                Prt_Proc.WaitForExit()
                Prt_Proc.Dispose()
 
            Catch ex As Exception
                Prt_Proc.Dispose()
                MsgBox(Err.Number & "  " & Err.Description)
            End Try
        End Sub
J'ai essayé plusieurs modification mais je ne trouve pas comment empêcher cette ouverture pour que mes impressions s'effectuent à la chaîne..

Merci pour votre aide!