bonjour a tous,
je me trouve face un problème et après m'être renseigné, le meilleur serait encore un script vbs.
Ne connaissant pas ce langage, je me tourne vers vous pour un coup de main.
L'idée :
je veux que deux imprimantes dans deux locaux différents s'installe automatiquement sur les machines. Pour cela, j'ai un serveur Windows 2003 SBS avec une OU "Printers" contenant deux groupes "OKI1" et "OKI2". Dans ces groupes sont ajoutés des comptes machines puisque je veux que peut importe l'utilisateur, ce soit une tel ou une telle imprimante qui soit liée.
Voila l'esquisse de script que j'ai fait, mais je doute que ce soit bon, ou au mieux, imcomplet.
Code :
- Dim objPrinter
- Dim strGroup
- Set wshShell = WScript.CreateObject("WScript.shell" )
- strGroup = wshShell.ExpandEnvironmentStrings("%USERNAME%" )
- Set objPrinter = CreateObject("WScript.Network" )
- Select Case strUsername
- Case "Oki1"
- objPrinter.AddWindowsPrinterConnection "\\SRVDUPONT\Oki1"
- objPrinter.AddWindowsPrinterConnection "\\SRVDUPONT\SamsungCPL350"
- objPrinter.SetDefaultPrinter "\\SRVDUPONT\Oki1"
- Case "Oki2"
- objPrinter.AddWindowsPrinterConnection "\\SRVDUPONT\Oki2"
- objPrinter.AddWindowsPrinterConnection "\\SRVDUPONT\SamsungCPL350"
- objPrinter.SetDefaultPrinter "\\SRVDUPONT\Oki2"
- Case Else
- objPrinter.AddWindowsPrinterConnection "\\SRVDUPONT\SamsungCPL350"
- End Select
|
J'espère que vous pourrez m'aider car je ne mis retrouve pas.
Un grand merci d'avance.
FORUM HardWare.fr
