Bonjour,

Afin de tester la laison entre deux PC jai utilisé en boucle le srcipte suivant

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
strComputer = "xxx.xxx.xxx.xxx" 
   Set objScriptExec = objShell.Exec( _
		"ping -n 2 -w 1000 " & strComputer)
   strResults = LCase(objScriptExec.StdOut.ReadAll)
   If InStr(1, strResults, "perdus = 0")  Then
		......
	Else
		......
 
	End If
Mais j'ai toujours la fenêtre de commande DOS qui s'affiche sur mon écran

Pourriez vous (please ) m'indiquer comment caché ou masqué la fenêtre DOS

Merci