begin process at 2010 02 09 18:26:42
  Trouver un code source :
 
dans
 
[ Dernières recherches ]
Accueil > 

Code

 > 

API-OLE

 > ADRESSE IP PUBLIQUE (EXTERNE)

ADRESSE IP PUBLIQUE (EXTERNE)


 Information sur la source

Note :
Aucune note
Catégorie :API-OLE Classé sous :adresse, ip, publique Niveau :Débutant Date de création :04/02/2005 Vu :6 418
Auteur : FrancisFaure

Ecrire un message privé
Site perso
Commentaire sur cette source (0)
Ajouter un commentaire et/ou une note

 Description

Pour faire suite à la contribution de Mike,
(voir http://www.atoutfox.org/articles.asp?ACTION=FCONSU LTER&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

  • #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 
#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=FCONSU LTER&ID=0000000134


 Sources du même auteur

LISTER LES ADRESSES IP DE LA MACHINE
RÉSOUDRE UN NOM DNS EN ADRESSE IP EN UTILISANT WS2_32 (DLL W...
Source avec Zip EXPÉDIER UN EMAIL : VFPWINSOCK / VFPSENDMAIL : EXPÉDITION DE...
Toutes les sources de FrancisFaure

 Sources de la même categorie

AUTOMATION DE WORD AVEC VFP par AbaqueInside
LISTER LES ADRESSES IP DE LA MACHINE par FrancisFaure
OUVRIR UN DOCUMENT WORD PAR AUTOMATION ET FAIRE UNE FUSION A... par leissler
[VFP]CLASSE SYSTEMTIME par FredArmoni
Source avec Zip SPLASHSCREEN TYPE ALERTE D'OUTLOOK2003 par FredArmoni
Toutes les sources de la catégorie API-OLE

 Sources en rapport avec celle ci

LISTER LES ADRESSES IP DE LA MACHINE par FrancisFaure
RÉSOUDRE UN NOM DNS EN ADRESSE IP EN UTILISANT WS2_32 (DLL W... par FrancisFaure

Commentaires et avis

Aucun commentaire pour le moment.

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

reseau vpn [ par panterga ] BonjourJ'utilise VFP9 , le logiciel fonctionne en réseau, J'ai installé le .exe et les dll sur un PC client  et la base de données et ses fichiers sur probléme d'adresse relatif (path) [ par sghchafaa ] Bonjour;je cherche  à exporter mon travail vers un autre pc, le travail contiens quelques images utilisé durant la programmationj''ai besoin de les ap


Nos sponsors


Sondage...

CalendriCode

Février 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728

Consulter la suite du CalendriCode
 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,530 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales
Outils Convertisseur VB/C# Snippets et scripts Outils en ligne La ToolBox
Communauté Programmation Photographie Technologie Newsgroups Emploi Forum Blogs
Guide d'achat Téléphonie mobile Image et son Informatique Bureautique Jeux vidéo
Logiciels Internet & Réseau Développement Market Android Jeux & Loisirs Graphisme Multimédia Sécurité Pilotes
Loisirs Cartes virtuelles Vidéos droles Jeux en ligne Géoguide AndroLib (Android Market)