Salve a tutti, dovrei salvare una serie di Array in un file binario per poi poterli richiamare, ma il mio codice non funziona come credevo.
per salvare
per caricarecodice:Public selezionatiFiltri%(0 To 90, 1 To 200), selezionatiFiltriDis%(0 To 90, 1 To 200) Public Quanti%(0 To 10, 1 To 200), QuantiDis%(0 To 10, 1 To 200) V = FreeFile Open DirBIN & SalvaFile.FileTitle & ".bin" For Binary As #V Put #V, , selezionatiFiltri() Put #V, , selezionatiFiltriDis() Put #V, , Quanti() Put #V, , QuantiDis() Close #V
Va bene raddoppiare gli spazi occupati? Perchè l'ho letto ma non ne ho capito il motivo..codice:V = FreeFile Open DirBIN & SalvaFile.FileTitle & ".bin" For Binary As #V '' non so se va bene, gli indici 1,36401,sono gli spazi(moltiplicati per 2) che occupano gli array '' salvati in precedenza Get #V, 1, selezionatiFiltri() Get #V, 36401, selezionatiFiltriDis() Get #V, 72401, Quanti() Get #V, 76401, QuantiDis() Close #V
![]()

Rispondi quotando