Discussion :

[Magnusmen]

bonjours.
j'ais un souci.
j'aimerais afficher L'IPV4 de l'ordi sur un label du style label.text = IPV4 en gros voila.
je n'est pas de souci pour L'IPV6 mais je n'y arrive pas pour L'IPV4.
voila merci.

[ekydeta]

Pour celà, tu dois importer la librairie associée, ( System.net ) et utiliser la fonction GetHostName.AdressList

Voici un petit exemple

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 Imports Microsoft.Net
Private Sub Bt_AdresseIP_Click(sender As Object, e As EventArgs) Handles Bt_AdresseIP.Click
 
Dim NomduPC As String 
 
Dim AdresseIP As String
 
 
Nomdupc = System.Net.Dns.GetHostName() 'Tu récupères le nom de ton PC
 
AdresseIP = System.Net.Dns.GetHostByName(Nomdupc).AddressList(0).ToString() 'Tu récupères l'adresse IP associé au nom de ton PC
 
MessageBox.Show("Nom du PC : " & strHostName & "; Adresse IP: " & AdresseIP) 'Tu affiches le nom et l'adresse dans une MessageBox
 
End Sub

En espérant t'avoir aider,


Edit : Pour le mettre dans un Label, tu utilises la propriétée .Text => Lbl1.text = "AdresseIP

Armand