M
mo ohne e
Hallo alle zusammen!
Ich habe mir schon die Finger wund gesucht und leider nicht das Richtige gefunden...
Also:
Ich möchte aus verschiedenen Files die erste Zeile bearbeiten (kürzen) und danach ersetzen. Es sind sog. .PDB Files aber die lassen sich mit dem Windows Wordpad öffnen.
Hier ist die erste Zeile sehr schön dargestellt. Nur wenn ich sie mit den gängigen Routinen auslese wird der Zeilenumbruch ignoriert und der gesamte Text des Files steht in dieser ersten Zeile....
Ich habe viele verschiedene Files in denen ich die Erste zeile, die immer anders ist, ändern möchte.
Hier der Code mit dem ich Zeile für Zeile auslese:
Public Function Datei_in_Array(datei As String)
Dim ZeilenText(1000) As String 'Array mit 1000 Feldern => max 1000 Zeilen einlesen
Open datei For Input As #1
zeilenindex = 0
While Not EOF(1)
zeilenindex = zeilenindex + 1
Line Input #1, ZeilenText(zeilenindex)
Wend
Label1.Caption = ZeilenText(1)
End Function
In dem Labe, wo jetzt die erste Zeile stehen sollte, steht dann immer der geasmte Text der ganzen Datei....
Weiß jemand woran das liegen könnte?
lg
mo
Ich habe mir schon die Finger wund gesucht und leider nicht das Richtige gefunden...
Also:
Ich möchte aus verschiedenen Files die erste Zeile bearbeiten (kürzen) und danach ersetzen. Es sind sog. .PDB Files aber die lassen sich mit dem Windows Wordpad öffnen.
Hier ist die erste Zeile sehr schön dargestellt. Nur wenn ich sie mit den gängigen Routinen auslese wird der Zeilenumbruch ignoriert und der gesamte Text des Files steht in dieser ersten Zeile....
Ich habe viele verschiedene Files in denen ich die Erste zeile, die immer anders ist, ändern möchte.
Hier der Code mit dem ich Zeile für Zeile auslese:
Public Function Datei_in_Array(datei As String)
Dim ZeilenText(1000) As String 'Array mit 1000 Feldern => max 1000 Zeilen einlesen
Open datei For Input As #1
zeilenindex = 0
While Not EOF(1)
zeilenindex = zeilenindex + 1
Line Input #1, ZeilenText(zeilenindex)
Wend
Label1.Caption = ZeilenText(1)
End Function
In dem Labe, wo jetzt die erste Zeile stehen sollte, steht dann immer der geasmte Text der ganzen Datei....
Weiß jemand woran das liegen könnte?
lg
mo
