用vbs得到计算机的 IP 地址
发布时间：2016-12-28 来源：查字典编辑
摘要：描述返回安装在计算机中的每个支持IP的网络适配器的IP地址。脚本代码复制代码代码如下:strComputer="."SetobjWMISer...
描述
返回安装在计算机中的每个支持IP的网络适配器的IP地址。
脚本代码
复制代码 代码如下:
strComputer="."
SetobjWMIService=GetObject("winmgmts:"&strComputer&"rootcimv2")
SetIPConfigSet=objWMIService.ExecQuery_
("SelectIPAddressfromWin32_NetworkAdapterConfigurationwhereIPEnabled=TRUE")
ForEachIPConfiginIPConfigSet
IfNotIsNull(IPConfig.IPAddress)Then
Fori=LBound(IPConfig.IPAddress)toUBound(IPConfig.IPAddress)
WScript.EchoIPConfig.IPAddress(i)
Next
EndIf
Next