Hier mal ein kleines Beispiel wie sich in eine beliebige Datei Daten schreiben lassen. Die Transferleistung wie man aus einer Datei Daten ausliest sollte bei dem einfachen Quellcode kein Problem sein. (Siehe unten.)
Speichern
' Deklarationen
Dim FileHandle As Integer
Dim FileName As String
' Einstellungen
FileName = "c:\AccWCexport.csv"
' Code
FileHandle = Freefile()
Open FileName For Output As FileHandle ' Ist wie der C fopen() Modus "w". Datei wird, wenn nicht existent, erstellt.
Print #FileHandle, "blaaa"
Close FileHandle
Laden
Deklarationen
Dim FileHandle As Integer
Dim FileName As String
Dim str as String
' Einstellungen
FileName = "c:\AccWCexport.csv"
' Code
FileHandle = Freefile()
Open FileName For input As FileHandle
While not eof(FileHandle)
Line Input #FileHandle, stringlein
MsgBox "Xte Zeile der Datei " & FileName & " beinhaltet " & stringlein;
Wend
Close FileHandle
Und keine Anmerken von wegen Variablenvernwendung, Korrektheit des Codes, etc... das sind Code Schnipsel die ich mir zur Auffrischung meines Gedächtnisses aufhebe und bei Bedarf hervorkrame
