IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VB.NET Discussion :

obteinr ip de mo ordi


Sujet :

VB.NET

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éclairé
    Avatar de warubi
    Profil pro
    Inscrit en
    Janvier 2007
    Messages
    399
    Détails du profil
    Informations personnelles :
    Âge : 33
    Localisation : France

    Informations forums :
    Inscription : Janvier 2007
    Messages : 399
    Par défaut obteinr ip de mo ordi
    Bonjour a tous ! J'aimerais obtenir l'ip de mon rodinateur en vb.Net mais je sais pas comment on fait. Pouvez-vous me donner un exemple de code simple ?

  2. #2
    Membre éclairé
    Profil pro
    Inscrit en
    Décembre 2004
    Messages
    612
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2004
    Messages : 612

  3. #3
    Membre éclairé
    Avatar de warubi
    Profil pro
    Inscrit en
    Janvier 2007
    Messages
    399
    Détails du profil
    Informations personnelles :
    Âge : 33
    Localisation : France

    Informations forums :
    Inscription : Janvier 2007
    Messages : 399
    Par défaut probleme de debutant
    Pourrez-vous me montrer un exemple de code car j'ai des erreurs a la compilations ?

  4. #4
    Membre éclairé
    Profil pro
    Inscrit en
    Décembre 2004
    Messages
    612
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2004
    Messages : 612
    Par défaut
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
            Dim saddr As String() = Nothing
            Dim addr As IPAddress() = Dns.Resolve("Titanium").AddressList
            If addr.Length > 0 Then
                saddr = New String(addr.Length) {}
                Dim i As Integer = 0
                While i < addr.Length
                    saddr(i) = addr(i).ToString
                    i = i + 1
                End While
            End If
     
            MsgBox(saddr(0))

    ici mon ordinateur se nomme Titanium et une Msgbox me renvoy mon adresse IP

    http://faqvbnet.developpez.com/index...etip_from_name

Discussions similaires

  1. ip fixeou nom de domaine sur ordi perso
    Par windob dans le forum Développement
    Réponses: 15
    Dernier message: 14/01/2004, 10h49
  2. Achat d'un ordi portable en Asie
    Par claude dans le forum Ordinateurs
    Réponses: 5
    Dernier message: 06/11/2003, 10h07
  3. Connexion entre deux ordi [Débutant]
    Par Ryadus dans le forum Développement
    Réponses: 2
    Dernier message: 12/06/2003, 21h47
  4. Réponses: 5
    Dernier message: 25/03/2003, 19h43
  5. eteindre l'ordi
    Par Anonymous dans le forum Langage
    Réponses: 4
    Dernier message: 30/08/2002, 22h39

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo