My computer has the following printers:

q-mis2-color on MRH-01 (set as default)
q-mis2 on MRH-01

My groups indicate that q-mis2 on MRH-01 is actually the default. This script should change the q-mis2 printer to be default but does not.

I return the status to the screen and q-mis2 is the default printer returned based upon group membership and 2 is returned as the PriMapState.

This $rc<>2 should return a 1 as
q-mis2 is installed, but not as default q-mis2-color is default. It should then set q-mis2 as default.

code:
$rc=PriMapState("\\" + $defprinter)
? $defprinter
? $rc
if $rc<>2
   $nul=SetDefaultPrinter("\\" + $defprinter)
   ? "Status - Default Printer set \\" + $defprinter
   ? @serror ?
  else
   exit 0
endif


[ 23. October 2003, 21:34: Message edited by: tjcarst ]