Supprimer toutes les imprimantes réseaux d’un poste
Le script permet de supprimer toutes les imprimantes réseaux sur un poste/serveur. ‘ ‘ RDR REMOVE NETWORK PRINTER ‘ ‘ ‘ Dim strComputer strComputer = « . » Set objWMIService = GetObject(« winmgmts:\\ » & strComputer & « \root\cimv2 ») Set colInstalledPrinters = objWMIService.ExecQuery (« Select * from Win32_Printer ») Set WshNetwork = WScript.CreateObject(« WScript.Network ») ‘msgbox « open script » ‘ Boucle sur les imprimantes For …
