Tester l'existence d'une imprimante en VB

Résolu
Bonjour,

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

Merci
Configuration: Windows XP
Firefox 1.5

2 réponses

  1. ç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
    1. 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