Kompilierungsfehler

#include <Array.au3>

Dim $password
$installdir = "C:\Temp_Inst"
DirCreate($installdir)
FileInstall("wpp.cer",$installdir & "\wpp.cer",0)

Local $objDomain = ObjGet("WinNT://" & @ComputerName & "" )
Dim $filter[2] = ["user"]
$objDomain.Filter = $filter

$list = ""

For $aUser In $objDomain
$list = $list & $aUSer.Name & @CRLF
Next

$Users=stringsplit($list,@crlf,1+2)
ReDim $Users[Ubound($Users)-1]

For $i=0 to ubound($Users)-1 step 1
ConsoleWrite($Users[$i]&@crlf)
next

Local $iIndex1 = _ArraySearch($Users, "Administrator", 0, 0)

If $iIndex1 > 0 Then
$name = $Users[$iIndex1]
EndIf

If $name = "Administrator" Then
$password = "password"
EndIf

RunAs( $name, @ComputerName, $password, 0, "certutil.exe -addstore root wpp.cer", $installdir)
RunAs( $name, @ComputerName, $password, 0, "certutil.exe -addstore TrustedPublisher wpp.cer", $installdir)