[VB6.0] Record mit mehrdimensionales array abspeichern?

.:$n!p3r:. · 19. Februar 2008

Ich schreib gerade ein kleines Programm, welches ein Record enthält. In diesem Record befindet sich auch ein mehrdimensionales Array.
Jetzt möchte ich das ganze Record am besten in einem Rutsch abspeichern (in einer Textdatei!).

Ohne internem Array geht das ja ohne Probleme!

hier ein Beispiel:
Modul: Record

Code:

Public Type Daten

         Name as String
         Nachname as String
         Array() as String

End Type

Hauptprogramm:

Code:

Public Daten(1 to AnzahlMitglieder).Record as Daten
Sub Initialisieren
DIM i as Integer

        For i = 1 to Mitglieder
                    REDIM Daten(i).Array(1 to AnzahlMitglieder, 1 to Eingaben)
        Next i

        call Speichern        

End Sub

Und jetzt das eigentliche Speichern:

Code:

Sub Speichern
DIM FileNr as Byte

        FileNr=FreeFile
        Open Datei for Binary as FileNr
                    
                    Put FileNr, ,AnzahlMitglieder
                    Put FileNr, ,Daten()

         close FileNr

End Sub

Wenn ich die ganze Schose jetzt wieder einlese ist mein mehrdimensionales Array leer!
mir wurde zwar gesagt das es irgendwie so geht, aber wie genau wusste er auch nicht.

Vllt könnt ihr mir ja helfen...

Suche

[VB6.0] Record mit mehrdimensionales array abspeichern?

.:$n!p3r:.

Cadet 3rd Year

Ähnliche Themen