]]>]]>ProcessName := "notepad.exe"
if (Processes := ComObjGet("winmgmts:").ExecQuery("Select * from Win32_Process Where Name = '" ProcessName "'")).count = 0
{
MsgBox, Процесс с именем %ProcessName% не найден
return
}
for k in Processes
MsgBox, % Memory := k.WorkingSetSize//1024ProcessName := "notepad.exe"
Processes := ComObjGet("winmgmts:").ExecQuery("Select * from Win32_Process Where Name = '" ProcessName "'")
Memory := ""
for k in Processes
MsgBox, % Memory := k.WorkingSetSize//1024
if (Memory = "")
MsgBox, Процесс с именем %ProcessName% не найден