VB6读取物理内存容量的问题
我在网上找了一个VB6读取物理内存容量的程序。代码：
strComputer = "."
Set wbemServices = GetObject("winmgmts:\\" & strComputer)
Set wbemObjectSet = wbemServices.InstancesOf("Win32_LogicalMemoryConfiguration")
For Each wbemObject In wbemObjectSet
WScript.Echo "物理内存 (MB): " & CInt(wbemObject.TotalPhysicalMemory / 1024)
Next
运行错误：
我查了一下，说是指定类无效。
请问高手，该如何解决？谢谢！
