
Présentation d'IP Dynamique version Visual Basic:
Ip Dynamique est une application développée en Visual Basic 6. Je me suis lancé dans le développement de ce soft en septembre 2003 après des problèmes chez un hébergeur payant (pas de nom svp!!!), mes 2 sites ayant totallement disparus et les bases sql effacées.
-- Récupération de l'adresse IP :
Etant chez Wanadoo et n'ayant pas les moyens de prendre une adresse IP fixe, Ip Dynamique devait pouvoir controler cette IP 'dynamique' qui changais toutes les 24 heures ou à chaques déconnexions. Possédant un modem adsl 'classique' (sagem fast 800) offert pour 1 euro chez Wanadoo, et un modem routeur Olitec SX200, IP Dynamique devait aussi être capable de récupérer l'ip derrière le routeur, ou si j'avais le modem classique la récupérer facilement sans encombrer la connexion. La sélection du modem ce fait donc manuellement dans IP Dynamique pour plus de fiabilité. Derrière un modem classique IP Dynamique récupère l'ip en utilisant les API Windows. Derrière un modem routeur (en réseau) IP dynamique utilise des page en php sur internet donnant l'adresse public et non l'adresse du pc sur le routeur (qui est du type 192.xxx.xxx.xxx). Ces pages internet en php permettent aussi à IP Dynamique de détecter si l'on est connecté à internet ou non.
-- Construction du lien :
Ip Dynamique construit une page html (par défaut index.htm) étape par étape, en utilisant les informations fournis par l'utilisateur et par IP Dynamique lui même. L'application repère le type de lien voulu par l'utilisateur (http, Ed2k pour les version inférieurs à 2.01 ou http,ftp,https,Ed2k, ou tous lien souhaité pour les version suppérieur à 2.01). Une fois la page html terminée, elle est envoyée par ftp sur votre escpase web.
-- L'envoi FTP :
C'est le composant INET de Visual Basic qui fait le transfert ftp. Les paramètres ftp sont récupérés dans le fichier Ip Dynamique.ini puis on récupère la page html construite plus haut et on l'envoi.
Un peu de code :
With Inet2
.RemotePort = 200
.URL = modINI.INIRead("FTP", "hote") 'ex: "ftp://ftp.multimania.com"
.UserName = modINI.INIRead("FTP", "pseudo") 'nom de session ex: "nicolas"
.Password = modINI.INIRead("FTP", "passe") 'mot de passe
.Execute , "PUT " & modINI.INIRead("connexion", "fichier a envoyer") & " /" & modINI.INIRead("connexion", "fichier sur serveur")
End With
C'est juste le code qu'il faut à IP Dynamique pour envoyer la page html.
Ip Dynamique 2.01 en quelques lignes :
-- 9967 lignes de codes
-- environ 3000 heures de programmation
-- 2880 heures de tests
-- 570 fichiers pour la construction
-- et des heures et des heures de recherche.
Ip Dynamique 2.50 en quelques lignes :
-- 10454 lignes de codes
-- environ 200 heures de programmation + les heures de la version 2.01
-- 384 heures de tests (à la mise en ligne de cette version)
-- 417 fichiers pour la construction (la plus part viennent de la version 2.01)
-- et des heures et des heures de recherche. |