Datei aus Dirlistbox einlesen

Hallo,

ich bin gerade dabei ein Programm zu entwerfen, dass den traffic auswertet. Das Programm soll aus einer Textdatei verschiedene Daten einlesen! Wie kann ich eine aus einer DirListbox ausgewählte Txt. Datei einlesen

Gruß

André

Hallo,
du meinst sicher, eine aus einer FileListBox ausgewählte Datei.

Nehmen wir an dein FileListbox-Control heist File1.

Dann kannst du auf diesen namen zugreifen über: File1.filename

folgende funktion liest die Textdatei aus:

Public Function ReadFile(Dateiname As String) As String
Dim FFile As Integer
Dim Inhalt As String

If Dir$(Dateiname, vbNormal) „“ Then

FFile = FreeFile
Open Dateiname For Binary As #FFile

Inhalt = Space$(LOF(FFile))

Get #FFile, , Inhalt

Close #FFile
End If

ReadFile = Inhalt
End Function

Dann musst du die funktion nur noch aufrufen:
z.b. in eine textbox schreiben:
text1 = readfile(File1.filename)

Fertig!
Der Dateiinhalt ist jetzt in der Textbox!

Viel Spass damit!

Gruss

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]