Hallo allerseits,
ich bin noch sehr neu in der AutoIt Programmierung und habe folgende Frage:
Ich lese von einem Server den Schedul-Task aus, filtere ihn, sodass nur meine eingerichteten Tasks angezeigt werden und speichere alles in eine .csv-Datei. Bis dahin ging ja alles gut. Anschließend lese ich die .csv Datei in ein Array ein. Nun möchte ich aber einige Spalten, die ich absolut nicht benötige aus dem Array entfernen und das bereinigte Array aus der Funktion übergeben. Wie kann ich vor der Übergabe die nicht benötigten Array-Spalten löschen - leider finde ich nichts Brauchbares. Kann mir da jemand helfen?
[autoit]Global $Server
Global $a_task
Func _taskread($server)
If FileExists(@WorkingDir&"\taskerg_"&$Server&".txt") Then
FileDelete(@WorkingDir&"\taskerg_"&$Server&".txt")
EndIf
If FileExists(@WorkingDir&"\taskerg_"&$server&".csv") Then
FileDelete(@WorkingDir&"\taskerg_"&$server&".csv")
EndIf
RunWait(@ComSpec & " /c " & "schtasks /query /fo CSV /s "&$server&" /v > "&@WorkingDir&"\taskerg_"&$server&".txt",@WorkingDir,@SW_HIDE)
Sleep(2000)
If FileExists(@WorkingDir&"\taskerg_"&$server&".txt") Then
Global $a_task
Global $taskread
_FileReadToArray(@WorkingDir&"\taskerg_"&$server&".txt",$a_task)
If IsArray($a_task) Then
$ergfile=FileOpen(@WorkingDir&"\taskerg_"&$server&".csv",1)
For $x=1 To $a_task[0]
$szeile=StringReplace($a_task[$x],'","',";")
$szeile=StringReplace($szeile,'"',"")
If Not StringInStr($szeile,"Hostname") And Not StringInStr($szeile,"\Microsoft\") And Not StringInStr($szeile,"\OfficeSoftwareProtectionPlatform\") Then
FileWriteLine($ergfile,$szeile)
EndIf
Next
FileClose($ergfile)
_FileReadToArray(@WorkingDir&"\taskerg_"&$server&".csv",$taskread)
Else
Return(0)
EndIf
Else
Return(0)
EndIf