Opendir

[Fairlight]

It works with any directory, AFAIK.

4.8  NEXTDIR            Returns system directory info.  Used with OPENDIR

      Syntax:

            XX = NextDir()

      Return Value - System directory information as follows:

            filename extension size date time fullname
               14       10      14    8    6     25

      Notes: A single space is returned between each portion of the string.
             Filenames, extensions, and fullname are left justified. Size
             is right justified w/commas. The date and time right justified.
             NextDir() can be executed more than once to build a list of
             files for sub-directory structures.

      Example:

        @wlf1  If: 1 gt ""             ' check field 1 gt ""
             Then: n = OPENDIR(1)      ' n = the number of dir entries
        ad2c   If: c lt n              ' c (counter) LT number of dir entries
             Then: c(4,.0)=c+"1"       ' add "1" to the counter
               If: not ad2c            ' no more directory entries
             Then: n = CLOSEDIR();end  ' n = "0" if properly closed
             Then: fn(25) = NEXTDIR()  ' return directories or filename & ext.
             Then: show "@The directory or filename.ext is: "<fn;goto ad2c


Don't even start me on the artificially low length limitations.

m->


On Thu, May 31, 2018 at 12:29:42PM +1000, Ken Cole via Filepro-list thus spoke:
> Does opendir only work on the filePro directory?
> 
> If not, how do you get it to return a list if all directories in the
> current directory?
> 
> Thanks
> 
> Ken
> -------------- next part --------------
> An HTML attachment was scrubbed...
> URL: <http://mailman.celestial.com/pipermail/filepro-list/attachments/20180531/258d9ca3/attachment.html>
> _______________________________________________
> Filepro-list mailing list
> Filepro-list at lists.celestial.com
> Subscribe/Unsubscribe/Subscription Changes
> http://mailman.celestial.com/mailman/listinfo/filepro-list
> 

-- 
Audio panton, cogito singularis.