Bestimmte Indizes in eine neue Textdatei schreiben

hipfzwirgel

Hallo Gemeinde,

ich soll aus einem Hardwarereport(Textfile) nur bestimmte Werte herauslesen und in ein neues Textfile schreiben.

C

#include <Constants.au3>
#include <WindowsConstants.au3>
#include <File.au3>
#include <Array.au3>


Global $sFilePath1 = "E:\bla\blupp\rechnername.LOG"
$hFileOpen1 = FileOpen($sFilePath1, 1)
If $hFileOpen1 = -1 Then
    MsgBox($MB_SYSTEMMODAL, "", "Es ist während dem Öffnen der 1. Datei ein Fehler aufgetreten.")
EndIf

_CI_GetCPU()

Func _CI_GetCPU()

; zu verwendende Indizes: 22,28,31,32,33,38,42

    Local $aArray1 = 0
   

    _FileReadToArray($sFilePath1, $aArray1)
   
    Local $s_Text = _ArrayToString($aArray1, @CRLF, ;??????? )


EndFunc   ;==>_CI_GetCPU

Alles anzeigen

Wie müsste ich die zu verwenden Indizes bei den Fragezeichen eintragen, bzw. geht das überhaupt so?

Peter S. Taler · *Ab 19-10-22 ergänzt um:*

Um diese Frage zu beantworten musst Du uns schon den Aufbau des Datensatzes zeige oder mitteilen. Denn wie Du sicher weißt geht das so:

Function _ArrayToString

Places the elements of a 1D or 2D array into a single string, separated by the specified delimiters

LGPeter

hipfzwirgel

Hallo Peter S. Taler,

Also ich bin mir nicht ganz sicher was du meinst:

Das Array ist ein 1D Arrray und in den Indizes stehen Werte wie "CPU Brand Name: 13th Gen Intel(R) Core(TM) i5-13500" (ist z.B. Index 22)

**Moombas**

Also: Nagel mich nicht drauf fest aber ich denke @CRLF wird shcon mal falsch sein, da jedes @CRLF beim einlesen von der Datei ins Array = Eine Zeile (Row) ergeben wird.

Daher ersetze: Local $s_Text = _ArrayToString($aArray1, @CRLF, ;??????? ) durch

AutoIt

Local $i_StartRow = 1, $i_EndRow = 4
Local $s_Text = _ArrayToString($aArray1, Default, $i_StartRow, $i_EndRow)

Dann kopiert er Zeile 1-4 des Arrays in deinen String.

hipfzwirgel

Hallo Moombas,

das ist ja mein Prob: die zu verwendenden Indizes stehen eben nicht untereinander. Also kann ich wie in deinem Beispiel eine Range 1-4 nicht nehmen oder?

Das @CRLF soll Delimiter sein, damit der Inhalt der Indizes in eine neue Zeile geschrieben wird...

hipfzwirgel

Hallo Moombas, hallo Peter,

ich habe eine Lösung gefunden:

Code

$aArrayFromText = _ArrayFromString($aArray1[22] & "|" & $aArray1[28])

Das erzeugt ein neues Array mit den Inhalten der beiden Indizes 22 und 28. So kann ich dann das neue Array mit _ArraytoString() in die neue Datei schreiben...
Ob das jetzt elegant ist, weiss ich nicht aber es funzt...

**AspirinJunkie**

Da hab ich mal Helferlein für derartige Fälle geschrieben.

Mit >>dieser UDF<< lässt es sich z.B. so lösen:

AutoIt

$aFiltered = _ArraySlice($aArray, '22,28,31,32,33,38,42')

Danach nur noch ein _FileWriteFromArray() und fertig.

Velted

hipfzwirgel,

verzeih mir, aber ich finde es sehr umständlich, aus bekannten Elementen eines Arrays erst ein neues Array aufzubauen, nur um das dann mit _ArraytoString wieder in einen String zu verwandeln, der dann weggeschrieben wird. Das geht doch bei Deinem Beispiel auch mit:

Code

$sFilePath = "MeinVollständigerDateiPfad"
Dim $aWerte = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9]

$sIndizes = "2|8"
$hFile = FileOpen($sFilePath, $FO_OVERWRITE)
If $hFile <> -1 Then
    For $I In StringSplit($sIndizes, "|", 2)
        FileWriteLine($hFile, $aWerte[$I])
    Next
    FileClose($hFile)
    MsgBox(0, "Erfolg!", "Die Datei " & $sFilePath & " wurde erstellt!")
Else
    MsgBox(16, "Fehler!", "Die Datei " & $sFilePath & "konnte nicht geöffnet werden!")
EndIf

Alles anzeigen

Es mag ja sein, dass das mehr Codezeilen benötigt. Man sieht aber auf den ersten Blick, was da passiert.

Peter S. Taler · *Ab 19-10-22 ergänzt um:*

Also manchmal verstehe ich die Probleme nicht wirklich.....

Wenn ich die Diskusion richtig interpretiere stehen im Array an den Stellen [22], [28], [31],[32],[38],[42] Werte die man haben will.

$_help = $_array[22] & ';' & $_array[28] & ';' & $_array[31] & ';' & ';' & $_array[32] & ';' & $_array[38] & ';' & $_array[42]

Denn Trenner ';' kann man natürlich durch jeden beliebigen Wert ersetzen z.B. durch ein chrlf. Anstelle einer Hilfsvariablen kann man es auch sofort in ein Textfile schreiben.... Elegant? Klar weil simpel

Peter