yep.
forgot to change the line when changed logic from while to do-loop.
also:
code:
CASE
INSTR($nptr,'\\')
;WRITE THE PRINTER TO THE CONFIG AS THE LOCAL NET PRINTER MAY HAVE CHANGED
$rc=WRITEPROFILESTRING($ps,'Printers','Default',$lpt)
$lpt1=READPROFILESTRING($ps,'Printers','Default')
USE LPT1: /delete /persistent
USE LPT1: $lpt1 /persistent
can be shortened to:
CASE INSTR($nptr,'\\')
;WRITE THE PRINTER TO THE CONFIG AS THE LOCAL NET PRINTER MAY HAVE CHANGED
$rc=WRITEPROFILESTRING($ps,'Printers','Default',$lpt)
USE LPT1: /delete /persistent
USE LPT1: $lpt /persistent
