Bannière

Métadonnées du document:
[ Auteur : Clockover ][ Création le : 25/09/2008 ][ Dernière modification le : 15/09/2008 ][ Version : 1.1 ]

Migrer des imprimantes automatiquement [VBS]

Etat du script: Fonctionnel

Présentation:

Un script VBS/WSH qui permet de supprimer une/des imprimante(s) d'un poste et d'en réinstaller une/des autre(s).
Ce script s'applique à tous les utilisateurs concernés mais un filtre peut facilement être ajouté.

Il suffit donc de l'appliquer par GPO pour que le script se lance à l'ouverture de la session d'un/des utilisateur(s).

Le script:

'Migration imprimante
'Version 0.1 20080925 by Clockover

Set WshNetwork = WScript.CreateObject("WScript.Network")

'On énumère les différentes imprimantes sur le poste
Set oPrinters = WshNetwork.EnumPrinterConnections

'WScript.Echo "Suppression des anciennes imprimantes"
For i = 0 to oPrinters.Count - 1 Step 2
	if oPrinters.Item(i+1) = "\\serveur\imprimante1" then
		WshNetwork.RemovePrinterConnection "\\serveur\imprimante1", , TRUE
	end if
	if oPrinters.Item(i+1) = "\\serveur\imprimante2" then
		WshNetwork.RemovePrinterConnection "\\serveur\imprimante2", , TRUE
	end if
Next

'Wscript.Echo "Installation des nouvelles"
WshNetwork.AddWindowsPrinterConnection "\\serveur\new_imprimante1"
WshNetwork.AddWindowsPrinterConnection "\\serveur\new_imprimante2"

'Wscript.Echo "Définition de l'imprimante par défaut"
wshNetWork.SetDefaultPrinter "\\serveur\new_imprimante1" 

TODO Liste:

-Vide

Historique:

flecheflecheVersion 0.1 (2008/09/25)
-Création du script et mis en production avec succès.


Il y a 0 commentaire(s) sur ce sujet.
L'intégralité du portail est placé sous licence Creative Commons License NC v2.0 (sauf mentions contraires indiquées sur les pages et/ou documents concernés !). Version: 4.2
Ce portail répond normalement aux critères de compatibilité XHTML v1.1 et CSS v2.0 du W3C:
Valid XHTML 1.1! Valid CSS 2.0!

Page générée en 0.006 secondes