#Include <WinAPIEx.au3>
Local $sProcName = "explorer.exe", $iPid, $aWins
$iPid = ProcessExists( $sProcName )
If $iPid Then
$aWins = _WinAPI_EnumProcessWindows( $iPid )
If Not @Error Then
For $Idx = 1 To $aWins[0][0] Step 1
ConsoleWrite( WinGetTitle( $aWins[$Idx][0] ) & @LF )
Next
Else
ConsoleWrite( "У процесса отсутствуют окна." & @LF)
EndIf
Else
ConsoleWrite( "Процесс не найден." & @LF)
EndIf