ATOUTFOX
COMMUNAUTÉ FRANCOPHONE DES PROFESSIONNELS FOXPRO
Visual FoxPro : le développement durable

Adresse IP publique (externe)

	Description
Retour à la liste L'auteur Francis Faure France Membre Actif (personne physique) # 0000000001 enregistré le 11/10/2004 http://www.wanagain.net 56 ans Faure Francis de la société Design Or Decline Fiche personnelle Note des membres pas de note	Contributions > 05 - API et appels systèmes > IP Adresse IP publique (externe) # 0000000134 ajouté le 08/01/2005 02:02:39 et modifié le 19/01/2006 consulté 13053 fois Niveau initié Version(s) Foxpro : VFP 9.0 VFP 8.0 VFP 7.0 VFP 6.0 VFP 5.0 VFP 3.0
	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....
	Code source :
	`#define TIMEOUT 30 && timeout 30 secondes o = createobject("internetexplorer.application") o.Navigate("http://www.atoutfox.org/ip.asp") v_t = SECONDS() * Edit Correction suite suggestion de Thierry * DO WHILE o.busy() AND (seconds() -v_t) <= TIMEOUT DO WHILE o.ReadyState<>4 AND (seconds() -v_t) <= TIMEOUT DOEVENTS ENDDO IF o.ReadyState<>4 v_ip = "0.0.0.0" else v_ip = o.document.nameprop() ENDIF RELEASE o ? "Votre adresse IP publique : ", v_ip`
	Commentaires
	le 08/01/2005, Mike Gagnon a écrit : Francis, est-ce le meme principe que mon poste "Comment obtenir l'addresse IP d'un d'ordinateur qui obtient son addresse dynamiquement" ? Si oui, alors je suprimme le mien. Mais le tien pointe sur atoutfox.org et le mien non. A toi de decider. le 08/01/2005, Francis Faure a écrit : Mike, ton article : http://www.atoutfox.org/articles.asp?ACTION=FCONSULTER&ID=0000000132 est très bien ! ne le supprime pas ! oui c'est le même sujet, mais je pense que laisser différentes solutions au VFPnaute est une bonne chose? le 27/09/2005, Thierry a écrit : Remplacer o.busy() par o.ReadyState<>4 Sinon, ce n'est pas fiable, ça retourne parfois 0.0.0.0

Adresse IP publique (externe)

Contributions > 05 - API et appels systèmes > IP