Supprimer toutes les imprimantes réseaux d’un poste

Le script permet de supprimer toutes les imprimantes réseaux sur un poste/serveur.

Adaptation du script

Supprimer toutes les imprimantes :

À la ligne 17

Rechercher : lcase(Left(objPrinter.Name,3)) = « \\1 »

Remplacer par : lcase(Left(objPrinter.Name,2)) = « \\ »

Supprimer les imprimantes mappées depuis un serveur spécifique :

À la ligne 17

Rechercher : lcase(Left(objPrinter.Name,3)) = « \\1 »

Remplacer par : lcase(Left(objPrinter.Name,9)) = « \\srv-imp »

9 : correspond au nombre de caractères dans \\srv-imp