vbs qui retourne 0

vbs qui retourne 0 - VB/VBA/VBS - Programmation

Marsh Posté le 17-06-2007 à 02:40:18    

bonjour,
 
je dois modifier les suffixes dns sur une 100aine de postes.
J'ai récupéré un script qui fait ça très bien, malheureusement il affiche un code de retour "0" dans une fenêtre windows à la fin de l'execution ; il faut alors cliquer sur ok pour fermer la fenêtre et terminer l'execution du script.
 
Je souhaite le deployer sur le site, mais ce déploiement doit être "silencieux" : je ne veux pas avoir à passer sur les postes pour cliquer sur ce message.
Y a t-il un moyen de l'annuler, de le rediriger vers un fichier, etc. ???
 merci de votre aide.
 
pour info, voici le script :
 
******************************
On Error Resume Next
 
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2" )
 
 
Set colNetCards = objWMIService.ExecQuery _
("Select * From Win32_NetworkAdapterConfiguration Where IPEnabled = True" )
 
For Each objNetCard in colNetCards
Wscript.echo objNetCard.SetDNSDomain("test1.local" )
*******************************

Reply

Marsh Posté le 17-06-2007 à 02:40:18   

Reply

Marsh Posté le 17-06-2007 à 18:25:40    

echo off ?

Reply

Marsh Posté le 18-06-2007 à 07:37:17    

Attention quand même car si c'est une erreur elle correspond à un argument ou appel de procédure incorrect
ou plutot à ce que retourne objNetCard.SetDNSDomain("test1.local" )  et alors se passer Wscript.echo


Message édité par kiki29 le 18-06-2007 à 08:00:11
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed