Salutations j'aimerai avoir votre assistance!!
 
Actuellement j'essai de faire un script vbs avec ce que je trouve à droite et à gauche pour pouvoir comme cité dans le titre, de changer une imprimante par défaut grâce à son adresse IP.
La société dans laquelle je suis en stage souhaite que je mettes en place un serveur d'impression et que les imprimantes déjà par défaut sur les postes
restent après la mise en place du serveur d'impression.
Mon problème étant que mon serveur d'impression est opérationnel avec toutes les imprimantes réseaux mais je voudrais automatiser le déploiement grâce à un script qui aurait pourrait changer  
l'imprimante par défaut par la même mais qui passe par le serveur d'impression.
 
J'ai eu une idée de début de script mais plusieurs problèmes survient    

 
 
Merci pour vos solutions !!

Salut,
 
Et quels sont les problèmes rencontrés ?
 
Parce que sans problème expliqué, point de solution à attendre !

Salut  
Le problème que je rencontre actuellement c'est une erreur à la ligne 16 (if objPrinter.PortName = "X.X.X.1" AND objPrinter.Default = true then) qui me dit :
erreur : Orbjet requis :'objPrinter'
Code: 800A01A8
J'ai modifier la ligne 12 en retirant le s de Printer mais ça ne change pas grand chose

Ton Next est mal placé !
 
C'est l'instruction de fin du For Each et il est juste après, donc les lignes à partir de if objPrinter sont hors du For ... Next.
 
Déplace ton instruction Next juste après le End if et ca devrait mieux marcher.
 
Par la même occasion, pense à mettre ton code entre balises cpp/cpp ce sera plus lisible.

Yeeey ça marche merci !! Mais maintenant il me dit à la ligne 26 "Fin d'instruction attendue" si tu peux encore m'aider sur ce coup... :3

Petite modification apporté au script mais un problème reste encore pour m'embêter  Il m'indique qu'il y a un 'Next' qui est attendu
 

Bonjour,
 
Le "Else" à ligne 20 ne sert à rien, tout comme le "End If" ligne 24.

Oui en fait je viens de voir que j'ai mis des End If après chaque Elseif et du coup cela me gênais pour la suite, après j'ai laissé le Else à la fin mais ça fonctionne quand même donc je vais le laisser Merci !

 
Jourbon ! Petit up pour un petit problème perçu aujourd'hui...
Je m'explique ... Le script pour changer l'imprimante par défaut fonctionne à merveille sauf que lorsque je redémarre le poste, l'imprimante par défaut revient à l'imprimante initiale...  
J'ai un second script qui permettrait de supprimer les imprimantes hors serveur d'impression mais en faisant mon jeu d'essai je me suis rendu compte que pour les postes sur lesquelles il y a deux utilisateurs les imprimantes par défaut changées ne restent pas appliquée....  
 
Dans mon jeu d'essai, deux utilisateurs utilisant le même postes avec deux sessions différentes ainsi que des imprimantes par défaut différentes doit être appliqué.
 
Le problème étant que lorsque je me connecte sur la première session, le script change bien l'imprimante par défaut... et lorsque je change de session le script s'applique aussi... Donc là tout va pour le mieux... C'est après que ça se corse lorsque je retourne sur la première session l'imprimante par défaut s'est "réinitialisé" en celle que j'avais avant que le script ne s'applique.... et c'est pareil pour l'autre session... Bon après le script s'applique derrière mais bon c'est pas top pour mon second script qui doit supprimer toutes les imprimantes hors serveur d'impression qui sont présente sur le poste car après la seconde session n'aura plus l'imprimante par défaut initiale pour la basculer sur le serveur d'impression et elle va affecter la première imprimante venue ....  
 
J'aimerais que l' imprimante définit en imprimante par défaut reste active POUR TOUJOURS MWAHAHAH  ... Hum hum ... Enfin qu'elle reste active malgré le changement d'utilisateurs.
 
Merci pour vos lumières !