Ip

Résolu
Shark-Man Messages postés 22 Date d'inscription jeudi 23 octobre 2003 Statut Membre Dernière intervention 7 octobre 2006 - 24 déc. 2004 à 15:38
Shark-Man Messages postés 22 Date d'inscription jeudi 23 octobre 2003 Statut Membre Dernière intervention 7 octobre 2006 - 9 janv. 2005 à 20:02
Hello !
Dans un fichier a acces sequentiel, j'ai placé en string une ip.
Mon probleme, l'ip est enregistrée sous cette forme :
aaa.bbb.ccc.ddd
Je voudrais pouvoir décomposer cette ip en aaa en bbb en ccc et en ddd pour les mettres dans un textbox.
J'espere avoir été clair.
Merci !

"Vivre c'est suivre ses rêves et ses désirs, pas ceux des autres" --> Dyn "La violence est le dernier refuge de l'incompétence" --> Isaac Asimov

3 réponses

cs_CanisLupus Messages postés 3757 Date d'inscription mardi 23 septembre 2003 Statut Membre Dernière intervention 13 mars 2006 21
24 déc. 2004 à 15:44
Salut,

dim ip as string
ip= split(TaStringIp,".")

et ça donne :
ip(0) = aaa
ip(1) = bbb
ip(2) = ccc
ip(3) = ddd

Cordialement, CanisLupus
3
Shark-Man Messages postés 22 Date d'inscription jeudi 23 octobre 2003 Statut Membre Dernière intervention 7 octobre 2006
31 déc. 2004 à 15:30
Désolé retard.

Merci je teste tout de suite !

"Vivre c'est suivre ses rêves et ses désirs, pas ceux des autres" --> Dyn "La violence est le dernier refuge de l'incompétence" --> Isaac Asimov
0
Shark-Man Messages postés 22 Date d'inscription jeudi 23 octobre 2003 Statut Membre Dernière intervention 7 octobre 2006
9 janv. 2005 à 20:02
Dim Ipn()
Ipn = Split(udtConfig.Ip, ".")
For i = 0 To 3
Txt_Serveur(i).Text = Ipn(i)
Next i

Sa marche tres bien !
Merci bcp et désolé retard

"Vivre c'est suivre ses rêves et ses désirs, pas ceux des autres" --> Dyn "La violence est le dernier refuge de l'incompétence" --> Isaac Asimov
0
Rejoignez-nous