使用脚本获取电脑有IPv4地址的mac地址，并输出，输出格式为用户名-主机名-ip地址-mac地址

[常微笑]

如题，需要写一个bat脚本，要求获取有IPv4地址的Mac 地址，并输出到一个文件中，输出格式为用户名-主机名-IPv4-mac地址 （多网卡环境）

[X-i-n]

字符串处理一向是批处理的弱点，直接用 VBS吧，会省事很多。

Set objWMIService = GetObject("winmgmts://./root/cimv2")
Set colItems = objWMIService.ExecQuery("Select * From Win32_NetworkAdapterConfiguration Where IPEnabled = True")
Set wshell = Wscript.CreateObject("Wscript.Shell")

result = wshell.ExpandEnvironmentStrings("%COMPUTERNAME%") & "-" & wshell.ExpandEnvironmentStrings("%USERNAME%")

For Each objItem in colItems
  For Each objAddress in objItem.IPAddress
    If objAddress <> "" then
      result = result + vbcrlf + objAddress & "-" & objItem.MACAddress
    Exit For
    End If
  Next
  'Exit For
Next

Set fso = CreateObject("scripting.filesystemobject")
Set f=fso.CreateTextFile( "d:\ip.txt",2,ture)
f.writeline result

msgbox result

[常微笑]

老哥，vbs有新手推荐书籍么？

[X-i-n]

没有留意过相关书籍。我想要实现什么功能，但不会写的时候，都是直接搜索引擎搜。