1

特定の要件に合わせてエクスペリエンスを調整するために、逆引き DNS ルックアップを実行して、ユーザーが適切なドメインにいるかどうかを判断しています。次の特定のインスタンスを除いて、以下のコードは正しく機能しています。

VPN および https:// 経由でサイトに接続する場合 (vpn および http:// は意図したとおりに機能します) 次のエラーがスローされます: "エラー: 要求された名前は有効ですが、要求されたタイプのデータが見つかりませんでした。 "

詳細な調査の結果、システムは予想される逆引き参照 (例: ws234.domainName.com) ではなく、奇妙なコンピューター名 (例: 3EDs45F46FG) を返しています。

Public Shared Function GetDomain() As String
    Dim RQST As System.Web.HttpRequest
    RQST = HttpContext.Current.Request
    Return ReverseLookup(RQST.UserHostName)'UserHostName as ip address
End Function    

Public Shared Function ReverseLookup(ip As String) As String
    Dim netDns As System.Net.Dns
    Try
        Dim host As New IPHostEntry 
        host = netDns.GetHostEntry(ip)
        Return host.HostName & "<BR><BR>ip: " & ip

    Catch ex As System.Net.Sockets.SocketException
        Return "Error: " & ex.Message & "<BR><BR>" & "ip: " & ip
    End Try
End Function
4

0 に答える 0