通过vbs获取本机IP地址和MAC地址
2010-08-24 15:02
169 查看
1，方法代码：
Function GetIPMAC(ComputerName)
Dim objWMIService,colItems,objItem,objAddress
Set objWMIService = GetObject("winmgmts://" & ComputerName & "/root/cimv2")
Set colItems = objWMIService.ExecQuery("Select * From Win32_NetworkAdapterConfiguration Where IPEnabled = True")
For Each objItem in colItems
For Each objAddress in objItem.IPAddress
If objAddress <> "" then
GetIPMAC = objAddress & ",MAC:" & objItem.MACAddress
Exit For
End If
Next
Exit For
Next
End Function
2，调用范例：
本机的机器名，用"."即可
print GetIPMAC(".")
Function GetIPMAC(ComputerName)
Dim objWMIService,colItems,objItem,objAddress
Set objWMIService = GetObject("winmgmts://" & ComputerName & "/root/cimv2")
Set colItems = objWMIService.ExecQuery("Select * From Win32_NetworkAdapterConfiguration Where IPEnabled = True")
For Each objItem in colItems
For Each objAddress in objItem.IPAddress
If objAddress <> "" then
GetIPMAC = objAddress & ",MAC:" & objItem.MACAddress
Exit For
End If
Next
Exit For
Next
End Function
2，调用范例：
本机的机器名，用"."即可
print GetIPMAC(".")
内容来自用户分享和网络整理，不保证内容的准确性，如有侵权内容，可联系管理员处理 
相关文章推荐
- 通过vbs获取本机IP地址和MAC地址
- Linux下通过nmap扫描局域网内设备，获取ip地址和mac地址
- VC通过套接字获取IP地址和MAC地址程序（转载）
- java通过IP地址获取mac地址
- 通过IP地址获取MAC地址及其对应的交换机端口
- 通过IP地址获取局域网中设备的MAC地址——java实现
- 通过IP地址，获取MAC地址，好像只能适用于局域网
- Linux下通过shell获取网卡的ip地址和mac地址
- 通过IP地址，获取MAC地址，好像只能适用于局域网
- Dos命令行下，如何通过IP地址获取局域网内机器的MAC地址？
- Linux下通过shell获取网卡的ip地址和mac地址
- 通过Python在windows和linux中获取当前网络IP地址的一些方法
- 腾讯新浪通过IP地址获取当前地理位置（省份）的接口
- Android获取设备ip地址和Mac地址
- 腾讯与新浪的通过IP地址获取当前地理位置（省份）的接口
- js获取mac地址和ip地址
- 获取客户端的IP地址和Mac地址
- C++ 中通过GetAdaptersInfo获取网卡配置和Ip地址信息
- Qt获取IP地址、MAC地址等网卡信息，区分本地网卡、无线网卡和虚拟网卡
- c#获取MAC地址和IP地址