[VB6] leggere file di grosse dimensioni

[uMoR]

devo gestire file da 20-30mb con vb, ma ovviamente quando provo ad aprirlo con il metodo tradizionale e con la line input la cpu va al 100% e si blocca tutto

come posso fare a gestire file di queste dimensioni ?

[ans]

Dim strDati as string, iFile as integer

iFile = FreeFile
open nomefile for input as #iFile
strDati = Input$(Lof(1), #iFile)
close #iFile

in strDati hai l'intero contenuto del file, e lo lavori in locale.

[uMoR]

scusa ma ho una variabile di 20-30mbyte ?

[ans]

una stringa dovrebbe poter arrivare a 2 giga.... leggi la documentazione.

[uMoR]

perfetto provo al più presto

grazie

[ans]

prova.

[uMoR]

ok funziona

come si riconosce in vb l'acapo dei file ?
(in pratica voglio leggere riga per riga la stringa)

[uMoR]

risolto

[ans]

dipende da cosa è stato utilizzato. Prova a fare una split con vbNewLine, quindi esempio:

Dim arrFile() as string

arrFile() = Split(strDati, vbNewLine)