PureBasic Forums - English

http 404... page not found

i've tried out both two your programs on two systems
and they boost my cpu usage to 100%

system 1: Acer aspire 1200 (celeron 1.3ghz, 256 Mbytes S3 Graphic Twister, WINDOWS XP PRO, dx 9.0b)
system 2: Home Pc (Pentium 4 2.0Ghz, 512 Mbytes, Radeon 7500,WINDOWS XP PRO, dx 9.0b)

hope this help you

the purpose of this program is to alpha-order a csv (comma separated value) file...
this file has only one empty line at the end and no empty line in the middle because there aren't paragraph... so it should work..
i found the problem in the file writing part! the file reading part was ok...

"figured it out"

i've modified the first original program i posted in this way and it worked:
Dim array$(10000)
filename$ = OpenFileRequester("Seleziona un file da ordinare in ordine ALFABETICO", "*.csv", "Comma Separated Value", 0)
If filename$="" Or filename$=".csv"
MessageRequester("Errore ...

the modify you suggest to me reduce the loss of data from two lines to one... i think the problem is in the second part of the program (when the file is saved) but i can't figure it out...

no way.. it remove 2 lines from the text file everytime...
i've modified in this way:
Dim array$(10000)
filename$ = OpenFileRequester("Seleziona un file da ordinare in ordine ALFABETICO", "*.csv", "Comma Separated Value", 0)
If filename$="" Or filename$=".csv"
MessageRequester("Errore", "Nessun ...

I've made the modification.. but it continue to remove two lines from the file... :cry: :cry: :cry: :cry:
Dim array$(10000)
filename$ = OpenFileRequester("Seleziona un file da ordinare in ordine ALFABETICO", "*.csv", "Comma Separated Value", 0)
If filename$="" Or filename$=".csv"
MessageRequester ...

hi to all, i've written this program to sort a file alphabetically but when i execute , it remove two lines from the text file.. i tried to process the same file until it goes empty!!! but i can't figure out the problem!!!
Someone may help me?

here's the program:
Dim array$(10000)
filename ...