Mehrzeilig Speichern und Laden

[mafioso]

klein und simpel.

Function speichern() 'speichert die variablen in einer textdatei
    Open  "C:\Datei.txt" For Output As #1
        Print #1, a 'erste zeile der .txt datei 
        Print #1, b 'zweite zeile der .txt datei
        Print #1, c 
    Close #1    
End Function

Function auslesen() 'liest die daten aus .txt. datei aus

Dim variable_a As String
dim variable_b as string
    Open "C:\Datei.txt" For Input As #1
        Input #1, variable_a 'daten in der ersten zeile werden dieser variable übergeben
        Input #1, variable_b 'daten in der zweiten zeile -||-
        .
        .
        .
    Close #1

 

[tg6300]

Wollte es testen, aber es gibt einige Fehler:

"Open" ist nicht deklariert. Dateieingaben und -ausgaben sind im Microsoft.VisualBasic-Namespace verfügbar.

For Input As #1 "end of"-Anweisung erwartet.

# Fehler Ausdruck erwartet.

Bist Du sicher das Dein Code für VB2005 gedacht ist?

Gruß,
Thomas

 

[Dario Linsky]

Hi,

nein, der Code ist auch wieder nur mit VB 6 kompatibel.

Um weitere Missverständnisse zu vermeiden wäre es vielleicht das beste, du startest mal einen eigenen Thread im .net-Forum.

Grüße, D.

 

[deepthroat]

Bist Du sicher das Dein Code für VB2005 gedacht ist?

Nein, ist er ganz sicher nicht. Du bist im falschen Forum. Siehe http://www.tutorials.de/forum/visual-basic/253268-themen-zu-vb-net-2003-2005-a.html

Gruß

Ups: Zehntelsekunden zu spät....

 

[tg6300]

Ok, das werde ich tun. Danke für die Hilfe.

Thomas