Code permettant de reconnaître si un périphérique

Question

Bonjour, je suis en plein stage et je recherche un code permettant de reconnaaître la connexion d'un périphérique (imprimante par exemple) si il est connecté ou non.
Merci d'avance.

cs_ITALIA · Answer

Permet de connaitre le nom des imprimantes installées sur ton PC....avec d'autres propriétés de Printer tu peux recupérer d'autres Info

Dim X As Printer
For Each X In Printers
Set Printer = X
Combo1.AddItem Printer.DeviceName
Next

It@li@

pcpunch · Answer

cela depend du periphérique, mais dans le cas d'une imprimante :


If Printer.DeviceName <> vbNullString Then _
MsgBox "Il y au moin une imprimante de connecté sur ce pc...", vbInformation _
Else MsgBox "Aucune imprimante sur ce Pc..."


Il suffit de regarder le nom de l'imprimante!! si le resultat est different de rien alors il y a au moin une imprimante.

Si tu veu verifier par exemple que c une "canon LBP810" il suffit de bouclé sur les noms d'imprimante et de comparer.

Ps: pour un autre périphérique (Carte video, modem , etc...) la demarche sera differente.....

pcpunch · Answer

Dsl Italia, je te repete mais lorsque j'ai consulter le post ta reponse n'y etait pas encore lol

On s'est raté de peu !!!! :)

++

Code permettant de reconnaître si un périphérique

3 réponses

Discussions similaires