General information
Category:
Coding, syntax & commands
Hello all,
This is a sample of the code
the idea here to merge a number of txt files into one file txt file
**************
aa = fopen(thisfile,10)
If aa < 0
=messagebox('Unable to open ' + thisfile + ' for uploading',0)
Release aa
Loop
Endif
l_process = .f.
Do while not feof(aa)
l_process = .t.
newline = fgets(aa)
=fputs(odrhandle,alltrim(newline))
**the var odrhandle is another txt file handle- Enddo
=fclose(aa)
Release aa
The problem is that many times when I open a file, I am immediately at feof() and I cannot then fclose() the file.
Any ideas about what is going wrong would be gratly appreciated. I've tested the code from the command window and everything works the way one would expect it to work.
Thanks
Sandy
Next
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only