#include <Array.au3>
;$iPID_Control = ProcessExists('process.exe');Ваш процесс
$iPID_Control = @AutoItPID; AutoIt3.exe
$aList = WinList()
Dim $aListPID[$aList[0][0] + 1][2]
$j = 0
For $i = 1 To $aList[0][0]
If WinGetProcess($aList[$i][1]) == $iPID_Control Then
$j += 1
$aListPID[$j][0] = $aList[$i][0]
$aListPID[$j][1] = $aList[$i][1]
EndIf
Next
If $j Then
ReDim $aListPID[$j + 1][2]
$aListPID[0][0] = $j
_ArrayDisplay($aListPID, $iPID_Control & ' AutoIt3.exe')
Else
MsgBox(16, 'Error', 'Нет')
EndIf