What is failing? You do not give any info or error messages. I do not see anywhere that you get the "primaryGroupID".
code:
break ON

$WS = GetObject("WinNT://" + @domain + "/" + @wksta + "$$,user")
if @error	
   ? @serror
else
   for each $grp In $WS.Groups
      $GrpName = $grp.Name
      if left($GrpName,8) = "Printer_"
         $printer = substr($GrpName,9)
         $printer = join(split($printer,"_"),"\")

            if not PriMapState("\\" + $printer)
               ? "Status - Printer not connected "+$printer
               $S=AddPrinterConnection("\\" + $printer)
;               $Returncode=AddPrinterConnection("\\" + $printer)
               ? "Status - Printer added "+$printer
               ? @serror
                ? 
            endif
       endif    
   next
   $PrimaryGrpID = $WS.Get("PrimaryGroupID")
   ? "@error @serror"
   ? $PrimaryGrpID 
endif


[ 10. October 2003, 05:04: Message edited by: Howard Bullock ]
_________________________
Home page: http://www.kixhelp.com/hb/