Discussion :

[hexen]

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

[jopopmk]

Salut,

j'ai fait un "print /?" et la commande ne semble pas permettre l'impression multiple. J'ai pas de "printto" a priori (Win7 64).
Peut-être auras-tu plus de chance en utilisant une fonctionnalité du framework ?
Il y a par exemple la classe PrintDocument, qui possède une propriété PrinterSettings qui possède une propriété Copies.
J'ai jamais utilisé ces objets, donc je sais pas si je t'envoie sur une bonne piste, mais ça semble cohérent.

PS : utilise les balises CODE pour tes extraits de code, ça fera une mise en forme/coloration syntaxique qui faciliteront grandement la lecture.

[thierry007]

Bonjour

Tu peux utiliser PrintPage de printdocument dans le quel tu places ce qui doit être imprimer

a la fin n'oublie pas de mentionner la fin de document avec e.HasMorePages = False

Tu a d'autre objets intéressants dans la toolsBox

[hexen]

Bonjour,

Merci, mais printdocument n'est pas ce qu'il me faut. Avec printdocument on génère la page a imprimer dans le programme VB, alors que je cherche à déclencher une impression multiple à partir d'un autre programme.

Avec le process défini par startinfo et lancé par start, j'arrive à ouvrir ou imprimer une fois le document dans son application, mais pas lancer plusieurs impressions en une fois.