Pour ceux qui comme moa veulent pouvoir récupérer leur IP sans etre chez eux afin de pouvoir se  
 
transferer des TRUCS par FTP (par exemple), voila 2 solutions :
 
1/ sous win98 :
   ------------
 
Vu que win98 n'a pas enormement de fonctionnalité l'astuce est d'envoyer par FTP sur son site  
 
perso un fichier texte contenant ses paramètres de connexions.
 
créer 1 fichier sendip.bat sous c:\
-->contenu de sendip.bat :
 ipconfig > c:\toto.txt // changez le toto.txt en nom bizarre 68UYYG.txt (+ dur a  
 
retrouver)
 ftp -s:param.txt
créer 1 fichier param.txt toujours ss c:\
-->contenu de param.txt
 open ftp.multimania.fr // connexion a votre site perso
 login
 password
 cd secret  // pour mettre le fichier dasn 1 rep caché (donner 1 nom comme  
 
nui98505 au répertoire)
 put toto.txt  // commande pour envoyer le fichier !!!
 bye
 
Voila reste plus qu'a faire 1 tache planifiée avec le planificateur de windows !!!!
 
Apres il suffit d'aller sur votre site perso dans le répertoire secret/toto.txt & vous avez  
 
votre IP
 
 
2/ sous win2000Server :
   --------------------
 
Cette x ci vu que l'OS c pas de la daube on va faire 1 peu mieux & s'envoyer par mail son IP !!!
 
créer 1 fichier sendip.bat sous c:\
-->contenu de sendip.bat :
 ipconfig > c:\ipconfig.txt
 cscript c:\SENDMAIL.VBS
 
créer 1 fichier SENDMAIL.VBS toujours ss c:\
-->contenu de SENDMAIL.VBS :
 
'************test de l'objet sendMail*******************
'declare all variables
 
 
 
Dim strFrom,strTo,strSubject,Body
 
fileNamePath="c:\ipconfig.txt"
moi="toto@hotmail.com"
strFrom="Monsieur IP"
strTo=moi
strSubject="Nouvelle IP -->"&Now()
Body=IPconfig &vbcrlf&vbcrlf
 
'#######################################
'#           #
'#  Procedure d'envoi d'e-mails        #
'#           #
'#######################################
Sub SendMail (strFrom,strTo,strSubject,Body)
 
 'mail constantes
 Const BodyFormatHtml = 0 'Corps au format HTML
 Const BodyFormatText = 1 'Corps au format text
 Const MailFormatMime = 0 'Mail au format MIME
 Const MailFormatText = 1 'Mail au format text
 Const Low      = 0 'Low importance
 Const normal      = 1 'normal importance
 Const High      = 2 'high importance
 
 Dim objSendMail
 Set objSendMail=CreateObject("CDONTS.NewMail" )
     objSendMail.From = strFrom
     objSendMail.To   = strTo
     objSendMail.Subject=strSubject
     objSendMail.Body=Body
     objSendMail.BodyFormat=BodyFormatText
     objSendMail.MailFormat=MailFormatText
     objSendMail.Importance=normal
     
     'objSendMailAttachFile FilePath_Name
     
     objSendMail.Send
     wscript.echo vbcrlf&"send ok"&vbcrlf
 Set objSendMail=Nothing
End Sub
 
 
Dim fso, f1, ts, s
Const ForReading = 1
Set fso = CreateObject("Scripting.FileSystemObject" )
' Read the contents of the file.
Set ts = fso.OpenTextFile(fileNamePath, ForReading)
s = ts.ReadAll
ipconfig = s
ts.Close
 
Body=Body&ipconfig
   
call SendMail(strFrom,strTo,strSubject,Body)
 
:-)
 
Pareil reste plus qu'a faire 1 tache planifiée avec le planificateur de windows & vous recevrez  
 
par mail votre IP !!!!
 
 
Allez bon courage ...
 

Compliqué ton truc mais intéressant...
Un autre truc facile est de prendre une adresse dns sur une site gratuit genre www.dyndns.org , ensuite quand il faut connaitre son ip on pinge son adresse tout simplement.

[edit]--Message édité par Lorenzotoz--[/edit]

jamais pensé !!!
 
c si tu veux mettre ton site en ligne tout le temps a partir de ta machine ca NON ????

Cool.
 
Faudra que j'essaye.

ouaip... intéressant, je voulais justement installer un PC anywhere entre chez moi et mon boulot.. histoire de voir si le d/l se passe bien pendant mon absence !!!