Error 53 ("File Not Found") Using FILES "filespec" Statement (58214)

MORE INFORMATION

When a FILES statement is used to list the files in a specific directory and the pattern that FILES is searching for does not exist, an error 53 ("File Not Found") is returned.

If the error is not trapped by the program, the error message "File Not Found" is displayed in the interpreter environment. In executable programs, the message displayed is "File Not Found In Module [Filename] at SEG:OFF," where SEG:OFF represents the segment and the offset from that segment of code where the error happened.

To avoid halting the program, the program needs only to trap the error 53 that is returned to the program. The program examples below demonstrate this, assuming that a file named ABC.XYZ does not exist on the root directory of drive C.

Example for Compiled Basics -- BASPROG.BAS

   ON ERROR GOTO ErrorHandle
   FILES "c:\abc.xyz"
   END
   ErrorHandle:
      IF ERR = 53 THEN PRINT "Error 53 was trapped. File not found."
   RESUME NEXT
				

You can compile and link BASPROG.BAS as follows in QuickBasic 4.00, 4.00b, or 4.50, Basic compiler 6.00 or 6.00b, or Basic PDS 7.00:

   BC /x Basprog;
   LINK Basprog;
				

Use QB /x Basprog in QuickBasic Versions 2.00, 2.01, 3.00.

Use BASCOM /x Basprog in QuickBasic Versions 1.00, 1.01, 1.02.

Example for GW-Basic Interpreter

   10 ON ERROR GOTO 999
   20 FILES "c:\abc.xyz"
   30 END
   999  IF ERR = 53 THEN PRINT "Error 53 was trapped. File not found."
   1000 RESUME NEXT