Bonjour,
Dans mon projet VB je souhaiterais faire en sorte que l'impression m'affiche une erreur si l'imprimante est hors ligne. Voilà donc ce que j'ai fait :
Cependant, lorsque mon imprimante est "hors connexion" cela ne me renvoie pas de message :s
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 Dim myPS As New PrintServer() Dim myPrintQueues As PrintQueueCollection = myPS.GetPrintQueues() For Each pq As PrintQueue In myPrintQueues If pq.Name = My.Settings.PrinterName Then If pq.IsOutOfPaper Then lblMessage.Text = "L'imprimante n'a plus de papier" ElseIf pq.IsOffline Then lblMessage.Text = "L'imprimante est hors-ligne" End If Next
Merci d'avance
Partager