[/LoovtO.net]Accueil > Informatique > Systèmes d’exploitation > Microsoft Windows > Vista > Script de suppression d’imprimantes pour Vista
Script de suppression d’imprimantes pour Vista
vendredi 9 mai 2008, par
Sous Vista, il n’est pas possible de supprimer une imprimante réseau lorsqu’elle n’est plus joignable. C’est parfaitement illogique mais ça n’est pas une première chez Microsoft. Ce script permet de supprimer du panneau de configuration les imprimantes présentes.
Petite précision avant toute chose, chez moi il a supprimé toutes les imprimantes présentes. Attention donc, avant toute utilisation, vérifiez que vous aurez bien la possibilité de réinstaller vos autres imprimantes si vous en avez...
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colInstalledPrinters = objWMIService.ExecQuery _
("Select * from Win32_Printer")
For Each objPrinter in colInstalledPrinters
objPrinter.Delete_
Next J’ai trouvé ce script au mois de janvier mais je ne sais plus où. Si son créateur le trouve ici, qu’il me le signale pour que j’ajoute l’URL d’origine. Merci à lui.
Vos commentaires
# Le 18 février 2010 à 22:04, par pierre En réponse à : Script de suppression d’imprimantes pour Vista
Bonjour,
ce script fonctionne bien. Il supprime toutes les imprimantes. mais, serit-il possible de l’adapter à supprimer juste une imprimante sur un poste et non pas toutes les imprimantes sur le poste.
merci pour le retour
Répondre à ce message
# Le 22 février 2010 à 08:16, par LoovtO En réponse à : Script de suppression d’imprimantes pour Vista
Sans doute... Mais comme indiqué ce script n’est pas de moi...
En cherchant un peu ça devrait être possible mais je n’ai plus de PC sous Windows à ma disposition pour faire les tests après modification.
Désolé...
Répondre à ce message