Foxtable(狐表)用户栏目专家坐堂 → system.management方式获取ip 怎么指定只获取ip4或ip6呢?


  共有3410人关注过本帖树形打印复制链接

主题:system.management方式获取ip 怎么指定只获取ip4或ip6呢?

帅哥哟,离线,有人找我吗?
cnsjroom
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1571 积分:11238 威望:0 精华:0 注册:2021/1/17 17:06:00
system.management方式获取ip 怎么指定只获取ip4或ip6呢?  发帖心情 Post By:2022/4/26 19:29:00 [只看该作者]

添加引用: system.management.dll

帮助文件:https://docs.microsoft.com/zh-cn/windows/win32/cimwin32prov/win32-networkadapterconfiguration

运行如下代码:

Dim query As System.Management.ManagementObjectSearcher = New System.Management.ManagementObjectSearcher("SELECT * FRO M Win32_NetworkAdapterConfiguration")
Dim queryCollection As System.Management.ManagementObjectCollection = query.Get()
Dim mo As New System.Management.ManagementObject
For Each mo In queryCollection
    If IsDBNull(mo.Item("macaddress")) = False Then
        If mo.Item("macaddress") <> "" AndAlso mo.Item("IPEnabled") Then
            output.show(mo.Item("macaddress"))
            output.show(mo.Item("DNSHostName"))
            For Each ip As String In mo.Item("ipaddress")
                output.show(ip)
            Next
        End If
       
    End If
Next

 

 

输出得到:

A0:D3:7A:A5:4E:0C
DESKTOP-4HGMIGM
192.168.43.112
fe80::3da9:7909:ae23:55b9

麻烦老师指导一下  谢谢!

怎么指定只获取ip4或ip6呢?

[此贴子已经被作者于2022/4/26 19:36:32编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107873 积分:548728 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/4/26 20:41:00 [只看该作者]

没接触过ip6,我也不懂。自己看微软的文档吧

 回到顶部