晕,跑到这来问了。干嘛不向我要呢???不能保证正确strComputer="."Set objSWbemServices=GetObject("winmgmts:\" & strComputer)Set colSWbemObjectSet=objSWbemServices.InstancesOf("Win32_PhysicalMemory")For Each objSWbemObject In colSWbemObjectSet Wscript.Echo "Total Physical Memory(kb):"& objSWbemObject.TotalPhysicalMemoryNext