Bonjour c'est re moi avec mes imprimantes infâmes !!
Cette fois-ci j'aimerais encore une fois avoir un coup de main mais cette fois pour ma partie de script pour la suppression des imprimantes sur les postes clients voici le bout de script
Code :
- '***Retire les messages d'erreurs pour parraître invisible au yeux de l'utilisateur
- on error resume next
- '***Temps d'attente de 20 secondes avant l’exécution du script
- WScript.Sleep 20000
- strComputer = "."
- Set objWMIService = GetObject("winmgmts:" _
- & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2" )
- Set colInstalledPrinters = objWMIService.ExecQuery _
- ("Select * from Win32_Printer" )
- For Each objPrinter in colInstalledPrinters
- '***Condition sur certaines imprimantes avec un nom spécifique qui ne seront pas supprimées.
- If objPrinter.Name <> "NameImprim1" and objPrinter.Name <> "NameImprim2" and objPrinter.Name <> "NameImprim3" and objPrinter.Name <> "NameImprim4" and objPrinter.PortName <> "X.X.X.1" and objPrinter.PortName <> "X.X.X.2" and objPrinter.PortName <> "X.X.X.3" then
- '***Suppression des imprimantes en locale
- objPrinter.Delete_
- End IF
- Next
|
Et le problème c'est que pour un utilisateur lambda l'accès est refusé... Tandis qu'avec le compte administrateur tout se fait sans que rien n’apparaisse
Il serait possible d'ajouter les droits à l'utilisateur pour supprimer les imprimantes et ensuite les lui retirer sans qu'ils ne voient rien ??
Si c'est le cas need le bout de script
Merci d'avance pour vos réponses !!!!!! ![:wahoo: :wahoo:](https://forum-images.hardware.fr/icones/smilies/wahoo.gif)
Message édité par drayaina le 21-03-2016 à 08:23:43