Ergebnis eines befehles in ein Array einlesen

#Region converted Directives from D:\Scripts_CRS\RRFaircom_Stoppen.au3.ini
#AutoIt3Wrapper_aut2exe=C:\Programme\AutoIt3\Aut2Exe\Aut2Exe.exe
#AutoIt3Wrapper_outfile=\\crs\e$\Scripts\Faircom_Status.exe
#AutoIt3Wrapper_Compression=4
#AutoIt3Wrapper_Res_Comment=http://www.hiddensoft.com/autoit3/compiled.html
#AutoIt3Wrapper_Res_Description=Abfrage des Cluster Status
#AutoIt3Wrapper_Res_Fileversion=4.0.0.6
#AutoIt3Wrapper_Res_Fileversion_AutoIncrement=y
#AutoIt3Wrapper_Res_LegalCopyright=2007 (c) Garnreiter
#AutoIt3Wrapper_Run_AU3Check=1
#EndRegion converted Directives from D:\Scripts_CRS\RRFaircom_Stoppen.au3.ini
;
#comments-start
CopyRight 2007 (c) Garnreiter
Version 4.0.0.6
#comments-end
#include<Array.au3>
#include<File.au3>
FileDelete(@ScriptDir & '\RRCL.TEMP')

Run(@ComSpec & " /c " & 'CLUSTER /CLUSTER:RRJACK1 RES ctreeServer /STAT >' & @ScriptDir & '\RRCL.TEMP')

Dim $A_CLUSTERSTATUS
_FileReadToArray(@ScriptDir & '\RRCL.TEMP',$A_CLUSTERSTATUS)

$Input = "online"
If @error Then Exit

$Pos = _ArraySearch ($A_CLUSTERSTATUS, $Input, 0, 0, 0, True)
Select
Case $Pos = -1
MsgBox(0, "Not Found", '"' & $Input & '" was not found in the array.')
Case Else
MsgBox(0, "Found", '"' & $Input & '" was found in the array at pos ' & $Pos & ".")
EndSelect
_ArrayDisplay($A_CLUSTERSTATUS)

#comments-start
CopyRight 2007 (c) Garnreiter
Version 1.0.0.17
#comments-end
#include<Array.au3>
#include<File.au3>
#include <Constants.au3>
Dim $A_CLUSTERSTATUS
local $Input = 'Online'
$foo = Run(@ComSpec & " /c " & 'CLUSTER /CLUSTER:RRJACK1 RES ctreeServer /STAT', @SystemDir, @SW_HIDE, $STDOUT_CHILD)

While 1
$line = StdoutRead($foo)
;~ $A_CLUSTERSTATUS = _ArrayCreate($line)
_ArrayAdd($A_CLUSTERSTATUS,$line)
If @error Then ExitLoop
Wend

_ArrayDisplay($A_CLUSTERSTATUS, "_ArrayDisplay() Test")

$Pos = _ArraySearch ($A_CLUSTERSTATUS, $Input, 0, 0, 0, True)
Select
Case $Pos = -1
MsgBox(0, "Not Found", '"' & $Input & '" was not found in the array.')
Case Else
MsgBox(0, "Found", '"' & $Input & '" was found in the array at pos ' & $Pos & ".")
EndSelect