VBS脚本大全,配有实例DOS命令.docVIP

VBS脚本大全,配有实例 DOS命令 VBS 取得本机IP 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 Each strAddress in IPConfig.IPAddress WScript.Echo strAddress Next End If Next 2 取得本机计算机名 strComputer = . Set objWMIService = GetObject(winmgmts:,, strComputer ,root,cimv2) Set colComputers = objWMIService.ExecQuery(Select * from Win32_ComputerSystem) For Each objComputer