Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Low level
Message
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Miscellaneous
Thread ID:
00598183
Message ID:
00598381
Views:
18
>thanks anyway but it still doesn't work
>
>Sandy


the following works for me :

LOCAL NumFiles, I
NumFiles=ADIR(la1)
FOR I = 1 TO NumFiles
IF EMPTY(FILETOSTR(ALLTRIM(la1[I, 1])))
? 'Unable to open file for checking ' + la1[I, 1]
ELSE
?la1[I, 1]
ENDIF
ENDFOR


Peter
Peter Cortiel
Previous
Reply
Map
View

Click here to load this message in the networking platform