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]

Reply via email to