Zeilen einer Textdatei in Array speichern

  • VB6

Es gibt 6 Antworten in diesem Thema. Der letzte Beitrag () ist von Mad Andy.

    Zeilen einer Textdatei in Array speichern

    Hallo, da ich normalerweise nicht sehr viel programmiere aber hin und wieder doch etwas zu programmieren ist, bin ich leider mit meinem Latein schnell am Ende, so auch hier:

    Ich muss eine Textdate, in der in jeder Zeile eine relativer Pfad+Ordnername steht, in ein Array einlesen, da ich die Ordner dann gerne löschen möchte.

    Hab schon viel im Inet gegoogelt, eigentlich auch viel gefunden zu diesem Thema, aber leider nichts wirklich passendes.

    Vielleicht hat von euch jemand eine Idee wie man das am besten lösen könnte....
    Ein herzliches Dankeschön im Vorraus
    lg mole

    In VB 6 geht es so:

    Visual Basic-Quellcode

    1. dim ff as integer
    2. dim strline as string
    3. dim lines() as string
    4. dim linecount as long
    6. ff=freefile
    7. linecount=0
    9. open "xyz" for input as #ff
    10. while not eof(ff)
    11. line input #ff,strline
    12. linecount=linecount+1
    13. redim preserve lines(linecount)
    14. lines(linecount)=strline
    15. wend
    16. close #ff
    Besucht auch mein anderes Forum:
    Das Amateurfilm-Forum

    Visual Basic-Quellcode

    1. Dim file as new io.filestream("blablaaaPfad", FilemodeOpen)
    2. dim re as new io.streamreader(file)
    3. Dim i as integer=0
    4. Dim arr(i) As String
    5. dim line as string
    6. line = re.readline
    7. do until line = ""
    8. arr(i) = line.readline
    9. i+=1
    10. redim preserve arr(i)
    11. line = re.readline
    12. loop


    Ich habe von Hand getippt also musst du paar stellen wie File-Deklaration ein bisschen korrigieren

    Dieser Beitrag wurde bereits 3 mal editiert, zuletzt von „Nikolai“ ()

    Hi!

    @ the-mole: n Doppelpost nach ner halben Stunde nach ner halben Stunde ist nicht wirklich notwendig ;)
    Es gibt ne Bearbeiten-Funktion

    @ Nikolai und Metal Freak: Achtet bitte darauf um welche VB-Version es sich handelt. Ein VB6-Programmierer fangt mit einem VB.net-Coder recht wenig an!


    so long..
    Andy

Facebook
Telefonspende