10 open "addrph" as #1 len = 150 20 field 1, 35 as n$, 80 as a$, 12 as ph$ 30 lset n$ = "Basmark Corporation" 40 lset a$ = "1717 East Ninth Street, Cleveland, Ohio" 50 rset ph$ = "800-555-1212" 60 put 1 70 close 1
If FileNum is less than 1 or greater than the maximum number of open files, or if FileNum is not open, a "Bad file number" error occurs.
If FileNum is not open for random access, a "Bad file mode" error occurs.
from The Basmark QuickBASIC Programmer’s Manual by Lawrence Leinweber