描述
返回安装在计算机中的每个支持 ip 的网络适配器的 IP 地址。
脚本代码
复制代码 代码如下:
strComputer = “.”
Set objWMIService = GetObject(“winmgmts:\\” & strComputer & “\root\cimv2”)
Set IPConfigSet = objWMIService.ExecQuery _
(“Select IPAddress from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE”)
For Each IPConfig in IPConfigSet
If Not IsNull(IPConfig.IPAddress) Then
For i=LBound(IPConfig.IPAddress) to UBound(IPConfig.IPAddress)
WScript.Echo IPConfig.IPAddress(i)
Next
End If
Next
您可能感兴趣的文章:
- vbs列出内网的中计算机(工作组也可以)
- 域内计算机和用户获取实现vbs代码
- 用vbs实现判断计算机是笔记本还是台式机的代码
- vbs实现计算机重启
- 如何用VBS脚本收集远程计算机或本地计算机安装的软件
声明:本站(华域联盟www.cnhackhy.com)所有文章,如无特殊说明或标注,均为本站原创发布。任何个人或组织,在未征得本站同意时,禁止复制、盗用、采集、发布本站内容到任何网站、书籍等各类媒体平台。如若本站内容侵犯了原著者的合法权益,可联系我们进行处理。

评论(0)