Script : Set WshNetwork = CreateObject("WScript.Network") PrinterPath = "\\srv2003\Const508" PrinterDriver = "HP LaserJet 4250 PCL 6" WshNetwork.AddWindowsPrinterConnection "\\srv2003\Dep508", PrinterDriver WshNetwork.AddWindowsPrinterConnection PrinterPath, PrinterDriver WshNetwork.SetDefaultPrinter "\\srv2003\Const508" Script commenté : Set WshNetwork = CreateObject("WScript.Network") ‘L'objet WScript possède méthodes et propriétés permettant de manipuler les fichiers du système, les ‘connexions réseau ou encore les imprimantes. Ici nous allons utiliser la « bibliothèque » réseau. PrinterPath = "\\srv2003\Const508" ‘Dans cette variable, nous indiquons le chemin d’accès réseau de l’imprimante. PrinterDriver = "HP LaserJet 4250 PCL 6" ‘Nous allouons dans cette variable le nom du pilote de l’imprimante à sélectionner pour l’installation. WshNetwork.AddWindowsPrinterConnection "\\srv2003\Dep508", PrinterDriver ‘Dans la bibliothèque réseau, nous utilisons la méthode d’ajout d’une imprimante avec comme ‘paramètre le chemin et le pilote de celle-ci. WshNetwork.AddWindowsPrinterConnection PrinterPath, PrinterDriver WshNetwork.SetDefaultPrinter "\\srv2003\Const508" ‘Enfin cette méthode nous permet de mettre l’imprimante indiquée par son chemin, en tant ‘qu’imprimante par défaut. |