It appears the FILEATTR() function doesn't work.
According to http://www.ousob.com/ng/tools1-3/ng935ab.php , it says it
should return a bit-wise decimal number. I tried a few different ways...
absolute path, relative, and a piece of code my brother found from the
Harbour source files.
___Pre-test:
C:\hbm>attrib hello.prg
A H C:\hbm\hello.prg
___Result:
C:\hbm>hello.exe
0
0
0
___code
FUNCTION main()
? FILEATTR("hello.prg")
? FILEATTR("C:\hbm\hello.prg")
cFile := FILESEEK("hello.prg")
DO WHILE .NOT. EMPTY (cFile)
? cFile, FILEATTR()
cFile := FILESEEK()
ENDDO
return
// end
Have I found a bug? :3
--
smu johnson <[email protected]>
_______________________________________________
Harbour mailing list (attachment size limit: 40KB)
[email protected]
http://lists.harbour-project.org/mailman/listinfo/harbour
