tester existence adresse IP

tester existence adresse IP - VB/VBA/VBS - Programmation

Marsh Posté le 31-01-2005 à 08:48:37    

Bonjour, j'ai crée un VBS, à l'intérieur j'ai déclaré 2 boucles imbriquées (1ère pour l'avant-dernier octet, la 2ème pour le dernier).
Mon but dans un 1er temps est de tester toutes les adresses IP d'une plage DHCP (si elle existe)
Donc, voilà comment ça pourrait se passer : si @ IP n'existe pas, on passe à la suivante, sinon on copie un fichier sur le PC concerné par l'IP.
J'utilise le WSH, ainsi je pense que ça ressemble un peu à ceci :
// déclaration des Dim et Set //
if FSO.WshNetwork("adresse IP" ) = False
   DO Next("adresse IP" )
else  CopyFile (c:\icm.txt \\adresse IP\C$)
 
Merci de votre aide
nb : le début des adresses commence à 172.16.100.1 et finit à 172.16.101.254

Reply

Marsh Posté le 31-01-2005 à 08:48:37   

Reply

Sujets relatifs:

Leave a Replay

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