This is what I am using:

 Code:
$WS = GetObject('WinNT://' + @domain + '/' + @wksta + '$$')

   for each $grp In $WS.Groups
      $GrpName = $grp.Name