General information
Category:
Coding, syntax & commands
Hello All,
I'm getting some pretty weird behavior from my code and I hope someone out there will see what I'm missing.
Everything in this code I have checked from the command window and it all works fine. But within the application, it all fails
=adir(my)
For fcounter = 1 to alen(my) / 5
l_status = .t.
l_process = .f.
thisfile = my(fcounter,1)
wait wind 'Checking file ' + thisfile nowait
*the tt here returns a positve number
tt = fopen(thisfile)
If tt < 0
Repl probs.desc with 'Unable to open file for checking'
l_status = .f.
=fclose(tt)
Loop
Endif
=fseek(tt,0)
Do while not feof(tt)
**Hereis the problem
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