Connaitre son adresse ip/ afficher son adresse ip dans une msgbox en vbs

Soyez le premier à donner votre avis sur cette source.

Snippet vu 20 719 fois - Téléchargée 28 fois

Contenu du snippet

Ce script vous permet d'afficher votre adresse ip dans une msgbox.

Source / Exemple :


set r=createobject("wscript.shell")
 S=r.regread("HKEY_LOCAL_MACHINE\system\controlSet001\services\Tcpip\Parameters\Interfaces\{90B725AD-74AE-4918-B5C9-BBDB258174BA}\DhcpIPAddress")
if S="0.0.0.0" then

msgbox "Votre adresse IP est: 127.0.0.1"

else
msgbox "Votre adresse IP est: "&S
end if

Conclusion :


En fait l'ip est enregistrée par votre ordinateur XP dans la base de registre!
Il me suffisait de la pomper et de l'intégrer dans un script! L'ip qui se trouve
dans cette base quand vous n'êtes pas connecté est 0.0.0.0. J'ai fait en sorte
qu'elle s'affiche 127.0.0.1.

Je sais que la clé est impossible à retenir mais j'ai rien trouvé d'autre!
Si vous connaissez plus simple (toujours en vbs) publiez le car je n'ai rien trouvé à ce sujet dans le forum!
PS=Sur mon PC ça fonctionne mais pour vous je sais pas! ESSAYEZ!;P

A voir également

Ajouter un commentaire

Commentaires

astuceur
Messages postés
38
Date d'inscription
lundi 10 février 2003
Statut
Membre
Dernière intervention
21 septembre 2008
-
salur
dsl " racine incorrecte ds votre base de registre"

v essayer de chercher un truc du genre çà sert pas mal ;)
thx
FearBlue
Messages postés
149
Date d'inscription
lundi 15 septembre 2003
Statut
Membre
Dernière intervention
26 octobre 2008
-
Marche pas !!!!!!
Erreur de clé dans la base de registre !!!!
Dommage
DeadlyPredator
Messages postés
222
Date d'inscription
jeudi 15 janvier 2004
Statut
Membre
Dernière intervention
30 juin 2008
-
NORMAL TU UITILISE LA CLÉE DONT LE NOM EST LE GUID DE LA CARTE RÉSEAU. IL EST DIFFÉRENT POUR CHAQUE ORDI.
Devil17049
Messages postés
20
Date d'inscription
dimanche 2 mai 2004
Statut
Membre
Dernière intervention
28 octobre 2004
-
moi pariel ca marche po mé c super efficace t un pro ac tes idées ;)
syia
Messages postés
2
Date d'inscription
vendredi 31 janvier 2003
Statut
Membre
Dernière intervention
26 mai 2005
-
et bah error registre

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.