Tester l'existence d'une imprimante en VB

Résolu
silvermoon -  
 silvermoon -
Bonjour,

Est il possible de vérifier qu'une imprimante est bien déclarée sur un poste utilisateur (en vb)?

Merci
A voir également:

2 réponses

toto
 
ça peut peut-être t'aider :
Dim p As Printer
Dim k%
  For k = 0 To Printers.Count - 1
    Set p = Printers(k)
    MsgBox p.DeviceName
  Next k
0
silvermoon
 
Dim p As VB.Printer
Dim imprimante as String
Dim Lespion as Boolen

For Each p In VB.Printers
'MsgBox (p.DeviceName)
If p.DeviceName= monimprimante Then
Lespion = True
Exit For
End If
Next
0