German Suchen in Datei

[so27]

Hallo zusammen,

ich habe eine sehr lange Datei, die wie folgt aufgebaut ist:

A12;Dies und Das
A13;Und noch mehr
A14;Und noch etwas

Nun möchte ich es realisieren, dass ich in ein Textfeld beispielsweise A12 eingebe und mir die entsprechende Zeile in der Datei herausgesucht wird. Dabei soll dann nur der zweite Wert nach dem Semikolon als Ergebnis angezeigt werden.

Mit einer Datenbank ist das kein Problem, aber wie kann ich das mit einer normalen TXT-Datei realisieren?

 

[rboeck]

Hallo,

als erstes stellt sich die Frage, ob die Datei klein genug ist, um sie in den Speicher zu laden; wenn nein, könnte man sie in der Art durchlesen:

Dim Ht As String
Dim TR As TextReader
        TR.Initialize(File.OpenInput("c:\TestDir", "transfer.csv"))
       
        Do While Ht<>Null
            Ht=TR.Readline
            If Ht = [deine Bedingung] Then   [deine Aktion]
        Loop
       
        TR.Close

Wenn ja, könnte man sie in komplett in eine Map laden und in dieser dann suchen.