Huge array of variable length strings

[mdijkens]

Hmmm, this one also aborts above 3.5GB of files ....
It's the _ReadFile$() which goes wrong after 10000+ files with combined size >3GB

Code: (Select All)

path$ = "E:\TEMP\test\"

fname$ = _Files$(path$ + "*.*")

Do While fname$ <> ""

  If Right$(fname$, 1) <> "\" Then

    Print path$ + fname$

    c$ = _ReadFile$(path$ + fname$)

  End If

  fname$ = _Files$

Loop

I think that's a bug!