Need Help
My sub-program code
SPTR=1
SCRMESS=SAVESCREEN(10,15,18,65)
SET COLOR TO W+/R
@ 10,15 CLEAR TO 15,45
@ 10,15 TO 15,45 DOUBLE
@ 11,20 SAY 'SELECT PRINTER OUTPUT'
@ 13,18 PROMPT 'NETWORK'
@ 13,28 PROMPT 'LOCAL'
@ 13,37 PROMPT 'ABORT'
MENU TO SPTR
SET COLOR TO GR+/B
SET PRINT TO
IF sptr = 1
set print to lpt2
ENDIF
if sptr = 3
store 5 to sptr
endif
SET COLOR TO (CLRMON)
RESTSCREEN(10,15,18,65,SCRMESS)
RETURN
**
It will not work with W-XP when print it on network printer
My sub-program code
SPTR=1
SCRMESS=SAVESCREEN(10,15,18,65)
SET COLOR TO W+/R
@ 10,15 CLEAR TO 15,45
@ 10,15 TO 15,45 DOUBLE
@ 11,20 SAY 'SELECT PRINTER OUTPUT'
@ 13,18 PROMPT 'NETWORK'
@ 13,28 PROMPT 'LOCAL'
@ 13,37 PROMPT 'ABORT'
MENU TO SPTR
SET COLOR TO GR+/B
SET PRINT TO
IF sptr = 1
set print to lpt2
ENDIF
if sptr = 3
store 5 to sptr
endif
SET COLOR TO (CLRMON)
RESTSCREEN(10,15,18,65,SCRMESS)
RETURN
**
It will not work with W-XP when print it on network printer