script vbs - Réseaux - Réseaux grand public / SoHo
MarshPosté le 16-10-2008 à 12:04:51
bonjour je suis novice concernant les script je dois mettre au point un fichier vbs pour supprimer et reinstaller mes imprimante sur les poste de travail j'ai donc ceci : pour supprimer: Set WshNetwork = WScript.CreateObject("WScript.Network" ) on error resume next WshNetwork.RemovePrinterConnection "\\nom_serveur\nom_imprimante", true, true pour ajouter: Dim net Set net = CreateObject("WScript.Network" ) net.AddWindowsPrinterConnection "\\nom_serveur\nom_imprimante" net.SetDefaultPrinter "\\nom_serveur\nom_imprimante" sur mon poste sa marche nikel mais je voudrai l'affecter de mon poste sur tout les autre poste de la societe mais je ne connais pas la commande a rajouter pour que cela fonctionne j'ai essayer d'ajouter strComputer="nom_machine" au debut du script mais cela ne marche pas si quelqun connais la solution sa me ferai gagner beaucoup de temps merdi d'avance
Marsh Posté le 16-10-2008 à 12:04:51
bonjour je suis novice concernant les script je dois mettre au point un fichier vbs pour supprimer et reinstaller mes imprimante sur les poste de travail j'ai donc ceci :
pour supprimer:
Set WshNetwork = WScript.CreateObject("WScript.Network" )
on error resume next
WshNetwork.RemovePrinterConnection "\\nom_serveur\nom_imprimante", true, true
pour ajouter:
Dim net
Set net = CreateObject("WScript.Network" )
net.AddWindowsPrinterConnection "\\nom_serveur\nom_imprimante"
net.SetDefaultPrinter "\\nom_serveur\nom_imprimante"
sur mon poste sa marche nikel mais je voudrai l'affecter de mon poste sur tout les autre poste de la societe
mais je ne connais pas la commande a rajouter pour que cela fonctionne j'ai essayer d'ajouter
strComputer="nom_machine"
au debut du script mais cela ne marche pas
si quelqun connais la solution sa me ferai gagner beaucoup de temps
merdi d'avance