ホスト名からIPアドレスを取得する　 次の文書

Dim ipa As IPAddress
Dim iphEntry As IPHostEntry = Dns.GetHostEntry(Dns.GetHostName())
For Each ipAddr As IPAddress In iphEntry.AddressList
　If ipAddr.AddressFamily = Sockets.AddressFamily.InterNetwork Then
　　ipa = ipAddr
　　Exit For
　End If
Next

AddressFamilyを調べることでIPv4かIPv6か判定できる。
・IPv4＝Sockets.AddressFamily.InterNetwork
・IPv6＝Sockets.AddressFamily.InterNetworkV6

参照元：http://natchan-develop.seesaa.net/article/217830910.html
　




← 左の文字をここへ入力後 登録ボタンをクリックしてください

(サイト管理者承認後掲載されます)