我今天带着我的一段有问题的代码来找你。
Set mac = CreateObject("WScript.Shell").Exec("cmd.exe /C ipconfig /all")
Do While mac.Status = 0
WScript.Sleep 100
Loop
MsgBox "Your MAC address is " & vbNewLine & Left(Right(mac.StdOut.ReadAll, 775),756), vbExclamation, "Physical Address"
Set mac = Nothing
我的目标是找到计算机的物理地址并用msgbox返回;
然而,在运行这个程序时,我遇到了两件事:
- 即使我在命令中添加了 /C,CMD 程序也没有关闭。
- 经过仔细检查,我发现(使用 Len() 函数)在 CMD ipconfig /all 中计算了超过 6000 个字符,但是使用此程序,它表明该命令仅返回 4000 个字符。
我知道事实有问题,Set mac = CreateObject("WScript.Shell").Exec("cmd.exe /C ipconfig /all")
但即使在检查了其他答案等之后我也不知道。