1
0

memory_usage.vbs 314 B

123456
  1. On Error Resume Next
  2. Set objWMI = GetObject("winmgmts:\\.\root\cimv2")
  3. Set colOS = objWMI.InstancesOf("Win32_OperatingSystem")
  4. For Each objOS in colOS
  5. Wscript.Echo("{""TotalVisibleMemorySize"":" & objOS.TotalVisibleMemorySize & ",""FreePhysicalMemory"":" & objOS.FreePhysicalMemory & "}")
  6. Next