Laurent Godard ha scritto:
hi Laurent,
i just test and encounter the problem
it is due to the defintion of MaxIndex as integer (limited to 65535 then)
Function LoadDataFromFile(FilePath as String, DataList()) as Boolean
Dim i as Integer
...
Dim MaxIndex as Integer
changing to
Dim i as Long
Dim MaxIndex as Long
is ok (the limit is then 2.147.483.647)
Good!!
Another Patch to improve the library Tools! :-)
I have modified the function LoadData... and the code work!!
I can read any line in the big file, but I need to modifie several lines
and my problen now is how to write in the file the modified lines.
Sub Main
dim contenutofile(121000)' as array
dim pathfile as string
pathfile = "c:\Basilicata.txt"
converttourl(pathfile)
loaddatafromfile(pathfile, pippo())
for i = 0 to 12000
'msgbox pippo(i)
sString = pippo(i)
sString = sString & "further useful things"
' how to write sString in Basilicata.txt?
next i
End Sub
Probably I can to use SaveDAtaToFile (as well opportunely modified) but
actually I do not have result about...
..and sounds fine in more little help
:-)
Thank you kindly Laurent
Bart
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]