On Error Goto Printer.off

 BBS: Inland Empire Archive
Date: 03-24-92 (23:44)             Number: 180
From: JIM TANNER                   Refer#: NONE
  To: MIKE PHILLIPS                 Recvd: NO  
Subj: On Error Goto Printer.off      Conf: (2) Quik_Bas

 >    OR, is there a better trap for a printer error?

Somewhere near the top of the Main Module I have:

ON ERROR GOTO ErrorTrap

I have at the bottom of my Main Module something close to this:
 -------------------------------------------------------

ErrorTrap:

    SELECT CASE ERR

        CASE 24, 25

            CLS
            LOCATE 10,5:PRINT "Printer is not responding"
            LOCATE 12,5:PRINT "Check On/Off Switch"
            LOCATE 15,5:PRINT "Press <Enter>"
            Wait$ = INPUT$(1)
            RESUME

    END SELECT

------------------------------------------------------------
I have a lot more in there too but this should give you an
idea to start with...


Regards,
Jim Tanner

--- GEcho/beta
 * Origin: RiverBend | Osceola, AR | HST V32/V42b | (1:19/99)