Lesen Sie nur bestimmte Felder aus der CSV-Datei in vb.net

Ich habe diesen code zu Lesen, eine CVS-Datei. Er liest jede Zeile, devides jede Zeile mit Trennzeichen ',' gespeichert und das Feld Werte in array '"strline" ()' .

Wie extrahiere ich nur die gewünschten Felder aus der CSV-Datei?

Zum Beispiel, wenn ich eine CSV-Datei haben, wie

Typ,Gruppe,Nein,die Reihenfolge Nein,Keine Zeile,Datum (newline)
0,Admin,3,345678,1,26052010 (newline)
1 Mitarbeiter,5,78654,3,26052010

Ich Brauche nur den Wert der Gruppe Spalten,Reihenfolge, No und Datum.

Vielen Dank im Voraus für alle Ideen.

Dim myStream As StreamReader = Nothing
    ' Hold the Parsed Data
    Dim strlines() As String
    Dim strline() As String
    Try
      myStream = File.OpenText(OpenFile.FileName)
      If (myStream IsNot Nothing) Then
        ' Hold the amount of lines already read in a 'counter-variable' 
        Dim placeholder As Integer = 0
        strlines = myStream.ReadToEnd().Split(Environment.NewLine)
        Do While strlines.Length <> -1 ' Is -1 when no data exists on the next line of the CSV file
          strline = strlines(placeholder).Split(",")
          placeholder += 1
        Loop
      End If
    Catch ex As Exception
      LogErrorException(ex)

    Finally

      If (myStream IsNot Nothing) Then
        myStream.Close()
      End If
    End Try

InformationsquelleAutor fireBand | 2010-04-29

vb.net

7

1) NICHT VERWENDEN String.Split!!

CSV-Daten enthalten kann, Kommata, z.B.
```
id,name
1,foo
2,"hans, bar"
```
Ebenfalls wie oben würden Sie brauchen, zu behandeln, zitiert Felder etc... Siehe CSV-Info für mehr details.

2) Check-out TextFieldParser - es hadles alle diese Art der Sache.

Zurecht, die Vielzahl von verschiedenen entgeht, können Sie nicht mit string.split...

Probe aus: http://msdn.microsoft.com/en-us/library/cakac7e6.aspx
```
Using MyReader As New Microsoft.VisualBasic.FileIO.TextFieldParser("C:\TestFolder\test.txt")
    MyReader.TextFieldType = FileIO.FieldType.Delimited
    MyReader.SetDelimiters(",")
    Dim currentRow As String()
    While Not MyReader.EndOfData
        Try
            currentRow = MyReader.ReadFields()
            Dim currentField As String
            For Each currentField In currentRow
            MsgBox(currentField)
            Next
        Catch ex As Microsoft.VisualBasic.FileIO.MalformedLineException
            MsgBox("Line " & ex.Message & "is not valid and will be skipped.")
        End Try
    End While
End Using
```
Den MyReader.ReadFields() Teil, erhalten Sie ein array von strings, von dort aus müssen Sie den index benutzen etc...

PK 🙂
- +1 string.split ist nicht nur falsch, es ist auch extra langsam im Vergleich zu einer state-Maschine
- +1 für Schreien eine wichtige Warnung an den OP.
- Dem würde ich Zustimmen, dass es eine gute Warnung über die String.Split und " etc im Allgemeinen, aber es hängt alles davon ab, Woher die Daten stammen und was die Skillung ist. Die meisten Male, die ich gelesen habe, CSV-Dateien und verwendet String.Split, wenn ich landete mit zu vielen Spalten, ich hätte versagt die Datei und erzählte der Produzent der Datei zum Update seiner Daten zu.
- Ich bin völlig einverstanden mit "failing fast". Die Sache, die ich empfehlen, ist allerdings, wenn Sie erstellen/Konsum-Dateien in einem bestimmten format (in diesem Fall CSV) Sie sollten Ihr bestes tun, um die Umsetzung der festgelegten format. Der string split-Methode behandelt nur die Grundlagen der CSV und etwas wie die TextFieldParser-Klasse ist nur ein paar Zeilen mehr code, und Sie haben die volle CSV-reader-Unterstützung... Und wieder - wenn meine input Datei war anders würde ich es ablehnen, schnell zu!
InformationsquelleAutor Paul Kohler
0

Vielleicht statt nur den Import ausgewählte Felder, die Sie importieren alles, dann verwenden Sie nur die diejenigen, die Sie brauchen.

InformationsquelleAutor Matthew Jones

Schreibe einen Kommentar

Du musst angemeldet sein, um einen Kommentar abzugeben.