[Creat0R]

HORRIBLE,

Можно ли вернуть список запущенных процессов ПОЛЬЗОВАТЕЛЕМ ? »

Можно:

Код:

#include <Array.au3>

$aProcessInfo = _ProcListByUserName(@UserName)
_ArrayDisplay($aProcessInfo)

Func _ProcListByUserName($sUserName = @UserName)
    Local $oColItems, $objWMIService, $objItem, $cI_Compname = @ComputerName
    Local $aProcessList[1]

    $objWMIService = ObjGet("winmgmts:\\" & $cI_Compname & "\root\CIMV2")
    $oColItems = $objWMIService.ExecQuery("SELECT * FROM Win32_Process", "WQL")

    If Not IsObj($oColItems) Then Return SetError(1, 2, 0)

    For $objItem In $oColItems
        If $objItem.CSName <> $sUserName Then ContinueLoop

        $aProcessList[0] += 1
        ReDim $aProcessList[$aProcessList[0] + 1]
        $aProcessList[$aProcessList[0]] = $objItem.Name
    Next

    Return $aProcessList
EndFunc