FINDFILE
Used to find the names of files.
Syntax:
FINDFILE TEMPNAME$, FILTER$
Discussion:
This keyword requires two expressions, one to specify the string variable name to store the file name in, and another string variable which contains a "filter" string. The filter string usually specifies a path name and wildcards appropriate to the desired file type. See the example below.
FINDFILE is useful for listing all files of a certain type in a folder, or for analyzing large numbers of similar lens files. To reset FINDFILE back to the first file of any type, just call FINDFILE with a different filter, then call FINDFILE again with the original filter name. Each time FINDFILE is called with a new filter, it resets back to the first file that meets the filter specifications.
Example:
FILTER$ = "C:\Zemax\*.ZMX" PRINT "Listing of all Zemax files in ", FILTER$ FINDFILE TEMPFILE$, FILTER$ LABEL 1 if (SLEN(TEMPFILE$)) PRINT TEMPFILE$ FINDFILE TEMPFILE$, FILTER$ GOTO 1 ENDIF PRINT "No more files."
Next: