UserHostAddress が　::1 （IPv6)になってしまう

IPv4を取得したいのだが

開発環境

• Windows Server 2012 R2
• Visual Studio Community 2017
• Asp.net 2.0 3.5 4.5

アクセス元クライアントIPをIPv4で取得できない

System.Web.HttpContext.Current.Request.UserHostAddress で取得するも　::1 になってしまう
::1　は　localhost のIPv6でありIPv4　127.0.0.1を取得したい

Visual Studio 2008 まではIPv6の無効化で対応できた

その手順は

「ネットワークと共有センター」でIPv6のチェックを外す

レジストリエディタで　HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Tcpip6\Parameters\DisabledComponents　を 0xFF に変更

レジストリ値を　0x20 (IPv6 よりも IPv4 を優先する )　等いろいろやったがどうしてもIPv6を取得してしまう

netsh interface ipv6 show prefixpolicies　で確認すると　IPv4がIPv6より優先されているのだが？

はまったので取り敢えずコードで対応

下のコードを追加してようやく　アクセス元のIPv4アドレスを取得できた

Function getClientIPV4() As String
  Dim ipa As String = ""
  Dim iphEntry As System.Net.IPHostEntry = System.Net.Dns.GetHostEntry(System.Net.Dns.GetHostName())

  For Each ipAddr As System.Net.IPAddress In iphEntry.AddressList
     If ipAddr.AddressFamily = System.Net.Sockets.AddressFamily.InterNetwork Then
          ipa = ipAddr.ToString()
          Exit For
      End If
  Next
  Return ipa
End Function

所感