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,
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]