LoopReadLine begrenzen?

[diabloGT]

Hallo zusammen,

ich habe ein Script, mit dem ich Daten aus einer .csv-Datei ziehe und eine DropDownList damit befülle, um dann noch verschiedene Sachen mit den Daten zu machen. Nun ist es so, das die gesamte Zeile aus der .csv-Datei gelesen wird. Ich brauche allerdings nur die ersten zwei Spalten (bzw. bis zum zweiten Semikolon, die Spalten sind in der DDL durch Semikolon getrennt).
Hier ein Auszug aus meinem bisherigen Code:

Code: Select all

list := []
listCount := 0

Loop, Read, C:\...\test.csv
{
	list := list . "|" . A_LoopReadLine
}

Ich müsste den String dann wahrscheinlich mit einem Loop parsen, wenn ich es bisher richtig verstanden habe. Ich bin mit der Syntax leider nicht klar gekommen und würde mich über Hilfe freuen

[nnnik]

Du kannst jeden Loop jederzeit abbrechen indem du den break Befehl ausführst.
Da in jedem Loop die variable A_Index hochgezählt wird kannst du mit

Code: Select all

if (A_Index = 3) {
	break
}

jeden loop nach der 2. (in der 3.) Wiederholung abbrechen.

Was mir auffällt ist, dass du list als array initialisierst, diese variable dann aber mit einem String überschreibst.
In AHK (wie in vielen anderen Sprachen auch) ist ein String kein Array gefüllt mit Buchstaben.
In AHK sind das 2 verschiedene Dinge die nichts miteinander zu tun haben.
v2 würde dir eventuell einen Fehler ausgeben, v1 wird es ignorieren.
Es ist aber besser wenn du list := "" verwendest.

[diabloGT]

bei A_Index geht es aber um den Zeilenindex, wenn ich richtig verstanden habe? Ich wollte allerdings jede Zeile nur bis zu einem gewissen Punkt auslesen, und nicht komplett

[LuckyJoe]

Kannst du mit dem Excel-Object darauf zugreifen?

Code: Select all

Excel     := ComObjActive("Excel.Application")		; aktuell laufende Excel Instanz
; Excel 	  := ComObjCreate("Excel.Application") ; startet eine neue Excel Instanz
WorkBook  := Excel.ActiveWorkbook					; aktuell geöffnete Datei
Sheet     := Excel.ActiveSheet						; aktuell geöffnete Tabelle
Cell      := Excel.ActiveCell						; aktuelle Zelle
Zellwert  := Cell.Value								; Wert der aktuellen Zelle
Zellwert2 := Cell.Offset(0,1).Value					; Wert der aktuellen rechten Nachbarzelle

... dann könntest du darüber eine Lösung finden.

Viel Erfolg! - Lucky Joe

[nnnik]

Du könntest hier entweder inStr in Kombination mit subStr verwenden oder StrSplit verwenden.
Weiterhin gibt es die Möglichkeit einen Parse Loop zu verwenden und nach der 2. Iteration abzubrechen.

[just me]

Moin,

Dateien sind an sich nur eine willkürliche Folge von Bytewerten. Wenn man sie bearbeiten will, muss man in der Regel ihre interne Struktur kennen.

Textdateien im Sinne von AHK beinhalten einen lesbaren Text, der in der Regel in einzelne Zeilen aufgeteilt ist. Solche Dateien unterstützt AHK mit Anweisungen, die die Daten zeilenweise einlesen. Das bedeutet aber letzlich nur, dass AHK dem Programmierer die Suche nach den Zeilenumbrüchen abnimmt. Darüberhinaus gibt es keinen weiteren Komfort. Wenn Du nur Teile von Zeilen haben willst, musst Du selbst Hand anlegen (siehe nnnnik's Antwort).

[LuckyJoe]

... oder - falls du auf Excel zugreifen kannst - du nimmst AHK zum komfortablen und einfachen Auslesen via ComObject

[just me]

... um die ersten zwei Felder jeder Zeile einer CSV-Datei abzugreifen, braucht AHK definitiv keine Unterstützung durch COM-Excel.

[divanebaba]

... um die ersten zwei Felder jeder Zeile einer CSV-Datei abzugreifen, braucht AHK definitiv keine Unterstützung durch COM-Excel.

Stimmt. AHK und ein bißchen Grips oder ein hilfreicher Hinweis, reicht vollkommen.

Vielleicht so?

Code: Select all

list := ""
; listCount := 0

FileRead, data, C:\...\test.csv ; Ich mag es, Dateien komplett zuvor einzulesen, außer ich benötige nur wenige Zeilen der Datei
loop, parse, data, `n, `r
{
	a := StrSplit(A_LoopField, "`;")
	list .= "|" . a.1 . "`;" . a.2
}
list := LTrim(list, "|")
msgbox % list
return

Aus Mangel an detaillierten Informationen, habe ich mich für ein Semikolon, als Trennzeichen, entschieden.
Das Ergebnis sollten Pipe-getrennte Paare sein, die ihrerseits durch ein Semikolon getrennt sind.