Zwei verschieden Strukturen per TextFieldParser aus einer Datei lesen

22/10/2007 - 21:49 von Robert Hauffe | Report spam
Hallo,

ich möchte zwei verschiedene Sachen aus einer Datei auslesen. Hier mal
ein Beispiel zum Aufbau der Datei.

Integer, Integer, String, Integer
Integer, Integer, String, Integer
Integer, Integer, String, Integer
Integer, Integer, String, Integer
###
String, Single
String, Single
String, Single

Wie erreiche ich es, dass VB die Zeile ### nicht ausliest und dann danch
mit Auslesen des geànderten Schemas fortfàhrt?

Momentan sieht meine Code so aus:

Dim ofd as New OpenFileDialog
Dim col As String()
Dim parser as FileIO.TextFieldParser
parser = My.Computer.FileSystem.OpenTextFieldParser(ofd.FileName, New
String() {Chr(9)})
...
Try
While Not parser.EndOfData
col = parser.ReadFields()
If col(0) IsNot "###" Then
If readPart1 = True Then
...
Else
...
End If
Else
readPart1 = False
End If
End While
catch ...

Das funktioniert leider nur für den ersten Teil, danach versucht VB das
### als Integer zu lesen...

Ich bràuchte was, bei dem der Cursor in die nàchste Zeile springt,
sobald VB das ### erreicht hat. Ich hatte es daher schon einmal mit
TextFieldParser.ReadLine() probiert, aber entweder funktioniert das
nicht, oder ich hatte das falsch eingebaut.

Kann mir jemand weiterhelfen?

Robert
 

Lesen sie die antworten

#1 Robert Hauffe
22/10/2007 - 22:46 | Warnen spam
Umm... hab zufàllig gerade den Fehler gefunden.

Falsch: If col(0) IsNot "###" Then
Richtig: If col(0) <> "###" Then

*ichTrottel* ;-)

Robert

Ähnliche fragen