Не могли бы вы использовать Win32_Process . WorkingSetSize?
Set objWMI = GetObject("winmgmts:\\.\root\cimv2")
Set colObjects = objWMI.ExecQuery("Select * From Win32_Process")
For Each Item in colObjects
WScript.Echo Item.Name & " - " & Item.WorkingSetSize
Next
Когда я запустил это в моей локальной системе, WorkingSetSize выглядел эквивалентно использованию байт памяти. Таким образом, вы бы поделили на 1024, чтобы получить КБ.