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

Code

 > 

Réseau & Internet

 > VISUAL IP LOCATOR

VISUAL IP LOCATOR


 Information sur la source

Note :
9 / 10 - par 18 personnes
9,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Réseau & Internet Classé sous :localisation, ips, internet, whois Niveau :Débutant Date de création :09/07/2005 Date de mise à jour :29/03/2006 17:41:32 Vu / téléchargé :12 940 / 2 201
Auteur : Egyde

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

 Description

Cliquez pour voir la capture en taille normale
Etant donné une adresse IP, ce programme extrait certaines infos whois est localise le serveur sur une carte.

Contrairement à MasterLocater (http://www.vbfrance.com/code.aspx?ID=32467) qui n'interroge que 'www.geobytes.com', Visual IP Locator commence par se connecter à la base de donnée ARIN (la base de donnée qui gère les IP d'amérique du nord). Si l'IP est gérée par cette base de donnée, le programme extrait les infos OrgName, Address, etc. Si ce n'est pas le cas, une analyse de la réponse d'ARIN permet de se brancher sur la bonne base (RIPE pr l'europe, APNIC pr l'asie, LAPNIC pr l'amérique du sud et AFNIC pr l'afrique) avant de renouveller la requête. De cette manière, les infos obtenus sont correctes.

Pour l'affichage graphique, j'ai choisi la méthode naïve qui consiste à associer à chaque country code des coordonnées sur la feuille (pr la position de la cible). Le .txt contient les codes reconnus. Je mettrais à jour au fur et à mesure.


 Conclusion

En faisant une petite recherche a posteriori, j'ai trouvé une page qui résume parfaitement l'idée que j'ai implémenté. Je la poste ici au cas où sa interesserait du monde (c en Delphi) : http://www.felix-colibri.com/papers/web/whois/whoi s.html

 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip


 Historique

11 juillet 2005 11:01:46 :
Localise tous les CC (Country Code) d'Amérique du Nord, du Sud et d'Europe.
12 juillet 2005 09:42:36 :
nouvelle interface graphique comprenant notamment 2 niveaux de zoom (planétaire et continentale).
13 juillet 2005 10:09:35 :
Localise tous les CC d'Asie
18 juillet 2005 16:28:13 :
Localise tous les CC d'Afrique
10 février 2006 11:07:28 :
- Ajout d'une status bar permettant de "suivre" ce qu'il se passe - Correction de la carte africa.gif
29 mars 2006 17:41:32 :
Mise à jour RIPE (la balise </u> devient </span>)

 Sources du même auteur

Source avec Zip Source avec une capture COVER SEARCH
Source avec Zip Source avec une capture NG FILM IDENTIFIER
Source avec Zip Source avec une capture EXPLORER RÉCURSIVEMENT UN SERVEUR FTP DISTANT
Source avec Zip Source avec une capture OBTENIR DE VRAIS NB ALEATOIRE
Source avec Zip Source avec une capture TREEVIEW - SAUVEGARDER L'ARBORESCENCE D'UN ARBRE
Toutes les sources de Egyde

 Sources de la même categorie

Source avec Zip Source avec une capture UPLOAD FTP VB 6 par Onin42
Source avec Zip Source avec une capture Source .NET (Dotnet) FAVORIS URL par Le Pivert
Source avec Zip Source avec une capture Source .NET (Dotnet) DEVSSH CLIENT SFTP/SSH par iblsysteme
Source avec Zip Source avec une capture CONNEXION RÉSEAU par ABUMAI
Source avec Zip CSOCKET - REMPLACEZ WINSOCK PAR LA VERSION 2 DES API par Renfield
Toutes les sources de la catégorie Réseau & Internet

 Sources en rapport avec celle ci

ACTIVATION/DÉSACTIVATION DE PROXY WEB par djebbipgm
Source avec Zip Source avec une capture Source .NET (Dotnet) FAVORIS URL par Le Pivert
Source avec Zip Source avec une capture Source .NET (Dotnet) CLIPBOARD_VB.NET par Le Pivert
Source avec Zip Source avec une capture Source .NET (Dotnet) STORMDATACENTER - DÉMO DE WEBBROWSER MULTIFONCTION VB9 NAVIG... par LightningStrike
Source avec Zip Source avec une capture GESTION VIDÉO par mich95

Commentaires et avis

Commentaire de MasterHack le 09/07/2005 22:55:41

Oui,c'est bien,j'aime bien.Merci et bonne continuation.

Commentaire de CrazyMan19 le 10/07/2005 03:09:30

ohhhh ! j ai bcp aimé ce code
trés bien
8/10

Commentaire de sebmafate le 10/07/2005 10:27:59 administrateur CS

le principe est intéressant...

Commentaire de crossblade le 10/07/2005 18:42:20

petit problème le programme trouve mon ordi à l'adresse suivante :
4676 Admiralty Way, Suite 330, Marina del Rey et dans quel pays? les Etats-Unis!!!
Bon ben j'habite au sud de paris donc en france... mais je met quand même dix car ça marche avec d'autres IP. Je prend donc mon cas pour une exeption...
* .-'''-.,.-"'-. +
( !  Bon ! . *
+ ".  Surf!  " (
* . "'-.,.-'" + .

Commentaire de Egyde le 11/07/2005 09:17:11

crossblade, peux-tu me donner les 2 champs A et B de ton IP (A.B.C.D) que je regarde ce qui se passe?

Commentaire de crossblade le 11/07/2005 12:42:53

Non mais j'ai compris ce qui c'est passé, je suis chez wanadoo et j'ai un IP qu'il affiche dans le logiciel qui gère la connection (commençant par 192.168) et qui est aux USA mais quand je vais sur des sites comme http://www.adresseip.com/ qui me donne mon IP, un autre apparaît et celui-là localise le centre wanadoo par lequel je me conecte (83.114)! Si quelqu'un par contre peut m'expliquer pourquoi j'ai deux IP différent, il est le bienvenue!
* .-'''-.,.-"'-. +
( !  Bon ! . *
+ ".  Surf!  " (
* . "'-.,.-'" + .

Commentaire de nihonsx5 le 11/07/2005 13:01:06

C'est une adresse de réseaux privés ! (192.168)
T'es pas derriere un routeur chez toi ?

Commentaire de entracyte le 11/07/2005 14:58:02

salut tout le monde :) ce programme me trouve a 8 rue de la Ville l&#39;Eveque
75008
Paris , alors que j'habite dans l'extreme sud de la france :) c'est bien pensé sinon bye

Commentaire de Egyde le 11/07/2005 15:09:30

Pour infos (je pense à entracyte), le programme renvoi l'adresse de la compagnie qui détient la plage d'IP (le siège social de Wanadoo par exemple), pas l'adresse de l'abonné !

Commentaire de crossblade le 11/07/2005 19:59:02

Merci Egyde, et en effet j'ai la livebox!

Commentaire de cashoverray le 16/07/2005 22:43:01

ok , ce code est supercool , tu peux me donner ton mail pour msn sur msn * Egyde
je veux avoir plus d'info sur ce code

Commentaire de gg69700 le 17/07/2005 16:52:07

super !!!
rien a dire d'autre

Commentaire de Egyde le 19/07/2005 21:13:47

L'historique l'a pas affiché mais j'ai updaté cette source il y a 2 jours : tous les CC d'Afrique sont maintenant ok.

Commentaire de Zlub le 20/07/2005 07:24:30

principe bien sympas ... par contre ça aurait était cool de prévoir la detection automatique de l'IP...

Commentaire de MasterHack le 20/07/2005 17:36:14

de mieux en mieux, bonne continuatio ;)

Commentaire de Frecky le 21/07/2005 04:02:09

j'y entre mon ip et il ne me trouve pas, "No available information about XXX.XXX.XXX.XXX"
pourtant je vais sur www.arin.net et je whois mon ip et y trouvent les information ( je suis du quebec)

Commentaire de Egyde le 21/07/2005 14:58:05

Le message "No available information about XXX.XXX.XXX.XXX" n'apparaît que lorsque WhoIs.CountryCode = "". Tu dois peut-être rajouter le code que arin.net te renvoi (qui doit être différent de CA - Canada -) parce que la liste que j'ai ne contient pas de CC spécifique au Quebec.

Commentaire de fcampagne le 02/08/2005 08:50:58

Existe t'il un programme similaire sur .NET???
Je n'ai pas pu voir le code du programme mais quel est le principe pour récupérer les informations sur le site internet de localisation?

Commentaire de Thomas46 le 04/09/2005 02:26:31

Bravo !  Très bien réalisé.

Commentaire de Egyde le 05/09/2005 10:31:56

Pour répondre à FCAMPAGNE (dsl, g t en vacances :-), le principe est le suivant :

- Tu envoi une requête sur les serveur whois (genre arin.net) de la même façon que tu pourrais le faire via Internet Explorer (pour cela, g utilisé le composant Winsock de VB6).
- Une fois la page web reçue dans son intégralité, le programme extrait les informations souhaitées de façon "linéaire" : le programme recherche l'occurence de "OrgName:", extrait le texte qui suit puis "OrgID:", etc. comme tu le ferais si tu "lisais" le source de la page. Le reste (notamment la gestion des champs comme "Address:" qui peut s'étaler sur +eurs lignes), c que du technique.

Pour ce qui est de la source, tu peux l'ouvrir sans avoir VB6 (avec notepad par exemple). J'imagine que la conversion en .NET est relativement triviale ;-)

Commentaire de epseelonahack le 19/09/2005 21:21:29

A really nice job ! that's perfect !
continu

Commentaire de tibzthebo le 23/10/2005 22:19:13

Bonjour c'est genial ça
mais moi sur la carte ça ne change pas toujour l'Amerique du nord
j'ai utilisé le lien de crossblade pour savoir mon adresse mais pareil Amerique
celle d'un ami,Amerique
je suis chez aol donc 172.... mon ami wanadoo
j'ai utilisé 15 IP differente pour tester,mais l'Amerique
help

Commentaire de Egyde le 26/10/2005 10:17:29

Pour Tibzthebo (et les autres bien sûr)

Les exceptions

Il existe de nombreuses exceptions.

Un grand nombre, de l’ordre de 20% tient au caractère multinational du fournisseur d’accès ou au fait qu’il utilise les services d’un ISP international ou un réseau privé de communication.

Le cas d’AOL est à cet égard significatif. AOL utilise les services du réseau UUNET. Les adresses IP dynamiques allouées par AOL apparaissent comme localisées en Virginie où se trouve le siège social UUNET.

Dès lors, les postes de travail des utilisateurs résidant sur le territoire français apparaissent sur la toile comme n’étant pas situés sur le territoire français.

(extrait de http://www.legalis.net/cgi-iddn/french/affiche-jnet.cgi?droite=decisions/responsabilite/ord_tgi-paris_201100.htm)

Commentaire de tibzthebo le 28/10/2005 22:37:53

merci Egyde
mais vraiment bravo c'est cool comme prog

Commentaire de CADRATURE le 25/12/2005 20:46:47

Très beau. Bravo.

Commentaire de colourpurple le 29/01/2006 15:30:42

a great and very surprising code . i really was astonshed to such a precious code it will teach me a lot but i steal need to learn about winsocks.well thanks for the code and believe me u r  a super programmer keeeeeep on .u need to add a progress par to make the prog cooler.thank u again from Morocco.
N.B morocco is one country there is a line dividing morocco in two plz delete it it's a mistake.
thank u

Commentaire de Egyde le 10/02/2006 11:14:28

The Atlas I used makes "Western Sahara" and "Morocco" two distincts countries. Sorry for this mistake (fixed).
Cheers!

Commentaire de YURIX le 29/03/2006 12:06:15

Je sais pas si c'est moi depuis un certain je n'arrive plus a localiser les IP des fournisseurs d'acces francais !
Je sais pas, le serveur distant ne marche peut-etre plus ?

Commentaire de Thomas46 le 29/03/2006 12:43:12

YuriX>De quel serveur distant parles-tu ?
Le programme effectue des requêtes sur différentes sites pour whoiser l'ip et en récolter les informations puis les afficher dans le programme.

Si cela te localise l'IP française en Amérique, lis plus haut Egyde a expliqué.
Si par contre ça indique une erreur, vérifie que si tu as fait un copier/coller tu n'ais pas copier de l'espace avec "xx.xx.xx.xx " <<

Commentaire de YURIX le 29/03/2006 13:22:24

Bah en fait j'ai essayer pas mal d'IP en fait.
Les robots d'exploration tel que Yahoo!, Google... marche sans probleme. Normal c'est l'amérique du Nord.
Le probléme c'est lorsque je mets un IP Free ou un IP UPC par exemple la barre d'etat marque connexion a Ripe.net. J'ai une boite de dialogue avec No available information for XXX.XXX.XXX.XXXX

Commentaire de Thomas46 le 29/03/2006 13:45:46

Oui voilà.
J'avais cette erreur aussi lorsque je laissais un espace avant ou après l'IP en copiant collant

Enfin, si ce n'est pas ça je vois pas trop (?)

Commentaire de YURIX le 29/03/2006 13:50:26

En fait le truc c'est que Ripe.net a un peu modifier sa page :
Il faut rajouter la case Ripe dans le module Cwhois:

Case ripe
            ni = Extract(row(), "inetnum</span></b>:", m_NetRange, 0)
            ni = Extract(row(), "descr:", m_OrgName, ni)
            ni = Extract(row(), "country:", m_Country, ni)
            ni = Extract(row(), "address:", m_Address, ni)
            m_City = ""
c le </span> ki remplace la balise </U> qui a changer.
et Supprimer le mot Ripe de la Case afrinic, apnic, ripe

Commentaire de Egyde le 29/03/2006 16:51:59

Merci pour cette info YURIX :)

Commentaire de Thomas46 le 29/03/2006 17:16:08

Ouep, thx :)

Commentaire de YURIX le 29/03/2006 18:52:57

De rien, sinon en ce qui concerne l'APNIC - LAPNIC et AFNIC j'ai pas vérifier... :)

Commentaire de Egyde le 29/03/2006 19:24:21

Pour AFNIC (ex : 128.134.0.0) et APNIC (ex : 81.192.0.0), ça n'a pas changé.

Commentaire de Egyde le 29/03/2006 19:26:06

arf, fo inverser les 2 ips :S. Mais bon, vous m'avez compris.

Commentaire de mOrfiUs le 12/04/2006 19:16:06

tres bonne utilite. Merci

Commentaire de Leonhart25 le 18/06/2006 23:27:17

Bonjour,

Je trouve interressant le system. Mais comment je pourrait l'essayer?

Commentaire de Thomas46 le 19/06/2006 10:03:49

LEONHART25 > Tu dois posséder Visual Basic 6 et ouvrir la source ensuite la compiler. Sinon demande à l'auteur de la source si il peut te fournir l'exécutable.

Commentaire de Sechaud le 22/07/2006 20:23:55

Il est super ton code.Moi qui cherchait à ajouter un Whois à mon programme Ping, publié récemment je suis comblé.
Je l'ai incorporé et j'apprécie beaucoup.
Je vais le dire sur VBFrance.
C'est vrai qu'il y a quelques surprises sur les localisations mais
le taux de réussite est très bon.

Commentaire de egc101 le 06/10/2007 15:27:36 9/10

Salut à tous !

Si ça interesse quelques personnes, j'ai porté le code de Egyde en C#.

Le source est disponible à cette adresse :
http://egc.free.fr/code/IPLocator.cs

J'ai légèrement modifié la méthode d'appel pour mes propres besoins.

La Classe s'utilise ainsi :

WebUtilities.IPLocator ipLocator = new WebUtilities.IPLocator();

ipLocator.PopulateProperties("<IPAddress>");
Console.WriteLine(String.Format("IP Address CountryCode: {0}", ipLocator.CountryCode));

ipLocator.PopulateProperties("<AnotherIPAddress>");
Console.WriteLine(String.Format("IP Address CountryCode: {0}", ipLocator.CountryCode));

J'ai commenté les modifications apportées en raison des différences VB/C#.

Il y a certainement des améliorations à apporter...
Avis aux amateurs !

A+

Greg

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

Gestion fichiers Internet [ par Christophe ] Est-il possible par un programme Vb d'effacer les fichiers temporaires, l'historique d'Internet Explorer et de plus fermer toutes les fenêtres explore Ouvrir un fichier txt sur internet [ par JCLK ] Je voudrais ouvrir un fichier txt se trouvant sur mon site internet pour en afficher le contenu dans une Textarea.Avec la commande Open "http://..." f internet [ par j_frost ] jaissais de faire un browser internetou plutot pour commencé cimplement meconecté a partir dun prog...un plus simple ce que je veux ses faire un prog savoir si un fichier existe sur internet [ par tobby ] Est-il possible de savoir si un fichier existe sur internet ou pas (404)?tout ca a partir de VB? Problème avec HTML... [ par WebMagique ] J'ai créé un programme qui permet d'aller sur internet (avec Ms. Internet Control et le WebBrowser)J'ai une liste de favoris mais quand l'utilisateur ouvrir une fenetre d'internet expolrer [ par awa33 ] salut!s.v.p je cherche une commande de shellqui me permis d'appler apartir de m'application un fichier HTML(fenetre d'internet expolrer)merci beaucoup Temporary Internet Files [ par donald ] Salut !Comment vider en VB6 le répertoire :C:\WINDOWS\Temporary Internet FilesMerci et @+ Détecter connexion internet [ par Wargames ] Comme l'indique le titre , je voudrais savoir comment peut-on détecter une connexion Internet. Composant Internet Explorer [ par Astroboy ] Bonjour à tous,2 problèmes peut-être simples mais dont je ne trouve pas la solution :Comment se fait-il qu'il est impossible d'obtenirle handle du com Trouver un ordinateur sur Internet [ par David ] Si je me connecte à Internet et qu'un ami fait de même, ai-je un moyen de le trouver avec Winsock SANS passer par un serveur dédié ? Comment faire ? C


Nos sponsors


Sondage...

Comparez les prix


Samsung LE26B350 LCD
Entre 359€ et 417€

Visiter le guide achat

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 : 1,279 sec (4)

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)