Bonjour,
J'ai un problème car je n'arrive pas a recuperer l'adresse IP. Pourtant je me sers de la fonction qui est proposé sur le FAQ VB.net, une erreur se produit.
Pourtant ma version du Framework est le 2.0. Je déveleppe sous VS2003.
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
16
17
18 Imports System.Net Function GetIPaddresses(Optional ByVal computername As String = "localhost") As String() Dim saddr() As String Dim addr() As IPAddress = Dns.Resolve(computername).AddressList() Dim i As Integer If addr.Length > 0 Then saddr = New String(addr.Length - 1) {} For i = 0 To addr.Length - 1 saddr(i) = addr(i).ToString Next End If Return saddr End Function
Partager