[转载]如何利用WMI脚本获得计算机的IP地址

文章作者：Inspiration

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


或许大家觉得这是多次一举，但是有的时候我们的用户可能根本不知道什么才是IP地址，那么我们写这样的一个脚本给他，让他告诉你答案就可以了，不需要更多的操作和口水。

Tip: 在Exchange里面，建立多个Store Group可以更加合理的提高Exchange 的工作效能，合理的对Exchange的数据进行备份。