10-24-2002, 06:01 PM
Like this:
Try typing in weird filenames and paths, and see what happens .
Code:
ON ERROR GOTO ErrorHandler
INPUT "File:"; File$
OPEN File$ FOR INPUT AS #1
CLOSE #1
ErrorHandler:
SELECT CASE ERR
CASE 53
PRINT "File not found."
CASE 64
PRINT "The file name you entered was incorrect."
CASE 76
PRINT "Path not found."
END SELECT
isit Blind Coding