SUPINFO International University

SUPINFO Institute of Information Technology
Laboratoire Microsoft




Lancer un ping

Accueil > Script > maintenance > Lancer un ping

Lancer un ping

Par Alexandre WETTA, LABORATOIRE SUPINFO DES TECHNOLOGIES MICROSOFT
Publiée le 06/02/2005 vers 15h.

Description :
Ce script VBS permet de pinger l'url spécifiée.

Script :

DIM objShell
url=InputBox("Entrez l'url ")
Set objShell = CreateObject("Wscript.Shell")
ireturn = objShell.Run("cmd /k ping.exe "& url & "", 1, TRUE )


Proposer un script

Notre avis :

Votre avis :

Réactions :
0

Votants :
15

Visites :
13027

1
2
3
4
5

Script Précédent :

Informations de votre systeme



Retrouvez ci-dessous les autres sections du Laboratoire Microsoft