Win32_LogicalMemoryConfiguration在win7下无法使用

原创

safeblood 2019-01-15 11:20:14 ©著作权

文章标签 vbs 无法使用 文章分类 运维

©著作权归作者所有：来自51CTO博客作者safeblood的原创作品，请联系作者获取转载授权，否则将追究法律责任

strComputer = "."

Set objSWbemServices = GetObject("winmgmts:\" & strComputer) Set colSWbemObjectSet = _ objSWbemServices.InstancesOf("Win32_LogicalMemoryConfiguration")

For Each objSWbemObject In colSWbemObjectSet Wscript.Echo "Total Physical Memory (kb): " & _ objSWbemObject.TotalPhysicalMemory Next 这段代码在win7下无法运行报错(null): 0x80041010 在win2003下可以运行，win7下已经取消Win32_LogicalMemoryConfiguration类以下是替代方法 strComputer = "." Set objWMIService = GetObject("winmgmts:\" & strComputer & "\root\CIMV2") Set colItems = objWMIService.ExecQuery( _ "SELECT * FROM Win32_PhysicalMemory",,48) For Each objItem in colItems Wscript.Echo "-----------------------------------" Wscript.Echo "Win32_PhysicalMemory instance" Wscript.Echo "-----------------------------------" Wscript.Echo "Capacity: " & objItem.Capacity Next 用Win32_PhysicalMemory instance代替之