OK, I just tested it, and it works fine.
To the suggestions I posted previously, I want to add two more:
1. For the interactive version, use the current directory as default directory.
For instance, instead of:
gcPathNameSkel = PADR("C:\*.*", 80)
You could use:
gcPathNameSkel = PADR(fullpath("") + "*.*", 200)
2. Add some comments, including your name, the year, and what the file is supposed to do.
>Hey Hilmar
>
>Here is my FLS.PRG based on your code, hope it comes in handy to you:
>* FLS.PRG
> ...
Difference in opinions hath cost many millions of lives: for instance, whether flesh be bread, or bread be flesh; whether whistling be a vice or a virtue; whether it be better to kiss a post, or throw it into the fire... (from Gulliver's Travels)