Textdatei in ein Array einlesen

  • VB.NET

Es gibt 5 Antworten in diesem Thema. Der letzte Beitrag () ist von symphonie89.

    Textdatei in ein Array einlesen

    Hallo liebe Vbler,

    da ich in Einlesen und Schreiben von Dateien noch nicht ganz so Fit bin, habe ich mir gedacht ich frage euch jetzt einmal.
    Ich möchte eine Datei in ein Array einlesen.
    Die Datei sieht wie folgt aus
    "config.txt" ist der name der Datei
    Server_IP=55.55.55.55
    Datenbank=dbname
    Benutzername=root
    Passwort=toor

    Mein bisheriger Code sieht so aus

    VB.NET-Quellcode

    1. Public Sub auslesen()
    2. Dim fs As FileStream
    3. Dim dateiname As String = "config\conf.txt"
    5. Try
    6. fs = New FileStream(
    7. dateiname, FileMode.Open)
    8. sr = New StreamReader(fs)
    9. '' da ich nur die daten hinter dem = brauche habe ich mit Replace gearbeitet
    10. server_ip.Text = sr.ReadLine()
    11. server_ip.Text = server_ip.Text.Replace("Server_IP=", "")
    12. datenbank.Text = sr.ReadLine()
    13. datenbank.Text = datenbank.Text.Replace("Datenbank=", "")
    14. benutzername.Text = sr.ReadLine()
    15. benutzername.Text = benutzername.Text.Replace("Benutzername=", "")
    16. passwort.Text = sr.ReadLine()
    17. passwort.Text = passwort.Text.Replace("Passwort=", "")
    18. sr.Close()
    19. Catch ex As Exception
    20. MessageBox.Show(ex.Message)
    21. End Try
    22. End Sub

    dieser Funktioniert auch ganz gut aber ich möchte die gesamt Datei in ein Array einlesen und damit weiterarbeiten.

    Ich hoffe ihr könnt mir da weiterhelfen. Wie gesagt ich bin noch nicht ganz so Fit darin. Wäre schön wenn ihr mir ein Paar Kommentare einbauen könntet. Damit ich dies für die Zukunft dann auch schnell alleine machen kann.

    Besten Dank im vor raus schon einmal.
    Lg
    Symphonie

    symphonie89 schrieb:

    mit ReadaAllLines habe ich es schon einmal heute versucht hat aber nicht Funktioniert.
    Was hat denn da nicht funktioniert?
    Du musst dann natürlich jede einzelne Zeile nachbesrbeiten. Mit Split oder RegEx.
    Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
    Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch :!:
    Ein guter .NET-Snippetkonverter (der ist verfügbar).
    Programmierfragen über PN / Konversation werden ignoriert!

    Habs ein wenig anders gestaltet ^^

    Hier meine Lösung

    VB.NET-Quellcode

    1. Public Shared Sub settingsLoad()
    2. 'Class1.RijndaelSimple.PassDecrypt(passwort)
    3. Dim a() As String
    4. Dim sr As StreamReader
    5. Dim line As String
    7. Try
    8. sr = New StreamReader("config\conf.ini")
    9. Do
    10. line = sr.ReadLine()
    11. a = Split(line, ":")
    13. Select Case a(0)
    14. Case "Server_IP"
    15. IP = a(1)
    16. Case "Datenbank"
    17. Datenbank = a(1)
    18. Case "Benutzername"
    19. Benutzername = a(1)
    20. Case "Passwort"
    21. passwort = a(1)
    22. End Select
    26. Loop Until line Is Nothing
    27. sr.Close()
    29. Catch ex As Exception
    30. MsgBox(ex.ToString)
    31. End Try
    32. End Sub