wie sieht Deine Datei aus? Schau Dir mal "Open As #", "Input" und "Line Input" an.
Gruß
Micha
Seek ist IMHO für binär geöffnete Dateien gedacht. Die Vorgehensweise bei Textdateien ist eigentlich immer die, dass man nach einer bekannten Textgruppe sucht und dann einliest. Deswegen ja meine Frage: wie sieht das Dateiformat aus?
Ausschnitt aus der MS-Hilfe:
Dim Textzeile
Open "DATEI1" For Input As #1 ' Datei öffnen.
Do While Not EOF(1) ' Schleife bis Dateiende.
Line Input #1, Textzeile ' Zeile in Variable einlesen.
Debug.Print Textzeile ' Ausgabe im Direktfenster.
Loop
Close #1 ' Datei schließen.
Gruß
Micha
ich weiß nicht, wer der Tor ist, aber .tor ist die Extension.
Das Format kenne ich nicht, könntest Du ein paar Zeilen andeuten und welchen Wert Du herausfiltern willst?
Gruß
Micha
Main_Reflector_1 reflector
(
coor_sys ref(Global_Coor_1),
surface ref(Main_Refl_Surf_1),
rim ref(Main_Refl_Rim_1)
)
Global_Coor_1 coor_sys
(
origin struct(x 0 mm,y 0 mm,z 0 mm)
)
Main_Refl_Surf_1 paraboloid
(
focal_length 2000 mm,
vertex struct(x 0 mm,y 0 mm,z 0 mm)
)
Main_Refl_Rim_1 elliptical_rim
(
centre struct(x -1537,900511 mm,y 0 mm),
half_axis struct(x 1000 mm,y 1000 mm)
)
Sub_Reflector_1 reflector
(
coor_sys ref(Coor_Sys_Subrefl_1),
surface ref(Sub_Refl_Surf_1),
rim ref(Sub_Refl_Rim_1)
)
dann würde ich, die angesprochenê Hilfe etwas abändern:
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen