Bonjour,

Je suis débutant en VBS et je cherche actuellement à créer un petit script pour tester la connexion ok ou ko à un serveur via les commandes telnet. Voici ce que j'ai écris:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
Dim WshShell 
set WshShell = WScript.CreateObject("Wscript.Shell") 
WshShell.Run "telnet 10.X.X.X" 
WScript.Sleep 1000 
WshShell.SendKeys "login {enter}" 
WScript.Sleep 1000 
WshShell.SendKeys "password {enter}"

Si la connexion au serveur est OK, mon script continue bien d'écrire les commandes suivantes (login + password). Par contre si la connexion au serveur est KO, alors la fenêtre de commande se ferme, mais le script continue à executer les commandes n'importe où.
J'aimerai trouver une fonction qui me permette de tester: si la fenêtre de commande est encore ouverte alors on le script exécute les commandes suivantes, sinon il ne fait rien.