Bonjour,
Je voudrais lancer automatiquement en vb l'impression d'un document et qu'il imprime X copie de ce document
J'ai trouvé cela, mais cela ne fait qu'une impression
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 Dim Prt_Proc As New Process ' imprime selon l'extension Try Dim Printer_Name As String = "" Dim pathFile As String = "\\195.150.195.12\commun\Etiquette\Etiquettes2\5151\FAA5151A90.LAB" 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 = True 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
J'ai essayé de mettre plusieurs Prt_Proc.Start() à la suite pour imprimer plusieurs fois le document, j'imprime bien plusieurs fois mais entre chaque impression il me demande la confirmation pour enregistrer le fichier.
Existe-t-il un paramètre pour lancer plusieurs impression ?
Ou une autre méthode ?
Merci d'avance
Partager