Adresse ip publique (externe)

Commenter

Contenu du snippet

Pour faire suite à la contribution de Mike,
(voir http://www.atoutfox.org/articles.asp?ACTION=FCONSULTER&ID=0000000132)
voici une autre version avec atoutfox

votre adresse ip dans votre réseau local est par exemple 192.168.0.1
vous sortez sur l'internet par un routeur ou un firewall qui fait de la NAT
vous cherchez votre adresse IP publique externe....

Source / Exemple : 


#define TIMEOUT 30  && timeout 30 secondes

o = createobject("internetexplorer.application")
o.Navigate("http://www.atoutfox.org/ip.asp")
v_t = SECONDS()
DO WHILE o.busy() AND (seconds() -v_t) <= TIMEOUT
  DOEVENTS
ENDDO
IF o.busy()
  v_ip = "0.0.0.0"
else
  v_ip = o.document.nameprop()
ENDIF
RELEASE o

? "Votre adresse IP publique : ", v_ip

Conclusion :


http://www.atoutfox.org/articles.asp?ACTION=FCONSULTER&ID=0000000134

A voir également

S'inscrire maintenant

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.

Du même auteur (FrancisFaure)