Discussion :

[f4bs30]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[Cachlab]

Bonjour,

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

++

[f4bs30]

Salut,

J'utilise un script qui fonctionne bien chez moi :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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