Script imprimante en fonction d'un groupe de securite
Bonjour à tous,
Je dois écrire un script qui permet à l'ouverture d'une session utilisateur d'ajouter les imprimates dont il peut se servir.
Voici mon script en vbs :
Option Explicit
Dim objNetwork, strLocal, strUNCPrinter1, strUNCPrinter2, strUNCPrinter3, strUNCPrinter4, strUNCPrinter5, strUNCPrinter6, strUNCPrinter7, strUNCPrinter8, strUNCPrinter9, strUNCPrinter10, strUNCPrinter11, strUNCPrinter12, strUNCPrinter13, strUNCPrinter14, strUNCPrinter15, strUNCPrinter16, strUNCPrinter17
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
|
strUNCPrinter1 = "\\srv-tse\SocialXerox"
strUNCPrinter2 = "\\srv-tse\ComptaX_Coul"
strUNCPrinter3 = "\\srv-tse\ComptaX_NB"
strUNCPrinter4 = "\\srv-tse\PhotXerox-A3-Coul"
strUNCPrinter5 = "\\srv-tse\PhotXerox-A3-NB"
strUNCPrinter6 = "\\srv-tse\PhotXerox-A4-Coul"
strUNCPrinter7 = "\\srv-tse\PhotXerox-A4-NB"
strUNCPrinter8 = "\\srv-tse\RICOH A3 2022"
strUNCPrinter9 = "\\srv-tse\RICOH A4 2022"
strUNCPrinter10 = "\\srv-tse\Xerox 5550 A3"
strUNCPrinter11 = "\\srv-tse\Xerox 5550 A4"
strUNCPrinter12 = "\\srv-tse\Xerox-B-5550-A3"
strUNCPrinter13 = "\\srv-tse\Xerox-B-5550-A4"
strUNCPrinter14 = "\\srv-tse\Xerox-B-7120-A3-COUL"
strUNCPrinter15 = "\\srv-tse\Xerox-B-7120-A3-NB"
strUNCPrinter16 = "\\srv-tse\Xerox-B-7120-A4-COUL"
strUNCPrinter17 = "\\srv-tse\Xerox-B-7120-A3-NB"
Set objNetwork = CreateObject("WScript.Network")
objNetwork.AddWindowsPrinterConnection strUNCPrinter1
objNetwork.SetDefaultPrinter strUNCPrinter1
WScript.Quit
' End of Guy's set printer script. |
Dans mon AD j'ai des groupe de sécurité :
-Groupe A
-Groupe B
-Groupe C
Ce que je souhaite faire :
EN fonction du groupe auqel mon utilisateur appartient, affecter les imprimantes dont il peut utiliser.
Est il possible de faire cela ?
Merci
