Erreur exécution script suppression d'imprimante erreur: 0x80041002

Bonjour,
voici mon souci, je veux exécuter le script ci-dessous afin de supprimer a chaque fermeture de sessions les imprimantes de mes utilisateurs.
Ayant de forte contrainte via des stratégies de groupes, l'imprimante par défaut ne monte qu'a la première éxécution des stratégies, pour contrer ça je souhaite purger mes imprimantes.
Le code s'exécute bien a la fermeture (script placer dans les GPO en fermeture), mais pour le confort j'aimerai ne pas avoir ce message d'erreur.
si je lance en manuel cela est pareil. environnement ws2008 x64 enterprise

voici le code de la "purge":

Code:

---

1 2 3 4 5 6 7

strComputer = "." Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") Set colInstalledPrinters = objWMIService.ExecQuery _ ("Select * From Win32_Printer Where Network = True") For Each objPrinter in colInstalledPrinters objPrinter.Delete_ Next

---

il est stipuler dans le message Ligne: 2 / Caract : 1
soit le S de set????
et la j'en perds mon latin.....

un petit coup de main serait le bienvenue.


vous remerciant par avance.

f4bs

Bonjour,

Peut-être cette discussion pourrait-elle t'inspirer ... ?

++

Citation:

---

Envoyé par Cachlab

Salut,

J'utilise un script qui fonctionne bien chez moi :

Code:

---

1 2 3 4 5 6

Set WshNetwork = CreateObject ("WScript.Network") On error resume next For i= WshNetwork.EnumPrinterConnections.count to 2 step -2 Imprimante = WshNetwork.EnumPrinterConnections.Item (i-1) WshNetwork.RemovePrinterConnection Imprimante, true , true Next

---

++

---

effectivement ton script ci-dessus fonctionne a merveille et apparament sans erreurs.
cependant je comprends toujours l'erreur généré par le script d'origine.....

bref un grand MERCI