Discussion :

[lodizzz]

Bonjour,

Je souhaiterais savoir s'il est possible en vb de savoir si le fait que l'imprimante n'est pas plus de papier est détectable ?

Merci d'avance

[asmduty]

Bonjour,

à quel type d'imprimante avez vous affaire ?

[lodizzz]

une imprimante de ticket, STAR TSP700 mais la marque de l'imprimante peut varier

[lodizzz]

C'est bon j'ai trouvé ! c'était donc possible

voici la solution pour ceux qui chercherait :

Code :

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

1
2
3
4
5
6
7
8
   Dim myPS As New PrintServer()
                Dim myPrintQueues As PrintQueueCollection = myPS.GetPrintQueues()
                For Each pq As PrintQueue In myPrintQueues
 
                    If pq.IsOutOfPaper Then
                        MessageBox.Show("Il n'y a plus de papier")
                    End If
                Next