RSS订阅悠然探索,悠然索取
你的位置:首页 » 技术笔记 » 正文

VB.Net取得服务器的IP地址

选择字号: 超大 标准 发布时间:2008-9-11 10:27:26 | 作者:admin | 0个评论 | 人浏览

        Dim StrHostName, IP As String
        StrHostName = ""
        ' 首先得到本地机器的主机名称  
        StrHostName = Dns.GetHostName.ToString
        '  然后通过主机名称得到IP地址列表 
        Dim ipEntry As IPHostEntry = Dns.GetHostByName(StrHostName)
        Dim Addr() As IPAddress
        Addr = ipEntry.AddressList
        Dim I As Integer
        For I = 0 To Addr.Length - 1
            IP += Addr(I).ToString + "@"
        Next
        IP = Addr(0).ToString
        CareFGetIP = IP

标签:VB.Net  

发表评论

必填

选填

选填

必填,不填不让过哦,嘻嘻。

记住我,下次回复时不用重新输入个人信息

◎欢迎参与讨论,请在这里发表您的看法、交流您的观点。