Debbo creare un buffer su cui scrivere m-volte (all'interno di un primo ciclo) un file preprocessato e da cui leggere n-volte (all'interno di un secondo ciclo), a dire il vero non so come fare, per il momento faccio + o - così:
codice:Do 'inizio primo ciclo '____________________________________________________________________________________________________ ' creazione del file temporaneo Set fs2 = CreateObject("Scripting.FileSystemObject") Set n2 = fs2.CreateTextFile(TempFile, True) line = algoritmo per la creazione di un file di testo n2.WriteLine (line) 'scrivo il file temporaneo n2.Close 'chiudo la scrittura del file temporaneo ' apro il file temporaneo in lettura Set fs3 = CreateObject("Scripting.FileSystemObject") Set n3 = fs3.OpenTextFile(TempFile, ForReading, TristateFalse) ' n3 contiene file letto Do 'inizio ciclo secondario '>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> 'leggo e processo il contenuto '>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> loop 'chiudo ciclo secondario n3.Close 'chiudo la lettura dal file temporaneo '____________________________________________________________________________________________________ loop 'chiudo primo ciclo
Funziona, ma l'HD deve faticare un pochino ad aprire e chiudere ripetutamente e scrivere e riscrivere il file temporaneo, esiste un modo più semplice che utilizza la ram?
Ciao a tutti![]()

Rispondi quotando