CLS
BREAK ON
$DomainString='MyDomain'
$GroupString='Domain Users'
$GroupObj = GetObject('WinNT://' + $DomainString + '/' + $GroupString)
$logshare=@scriptdir
$logfile=$logshare+'\'+$DomainString+'_ChangeScriptLog.CSV'
del $logfile

For each $UserObj in $GroupObj.Members
    ?$UserObj.Name
    $UserObj.LoginScript = 'StartLogon'
    $UserObj.SetInfo
    $logdata=$UserObj.Name+','+$UserObj.LoginScript+@CRLF
    LOGGER($logfile,$logdata)
Next
?'--'
?'Script complete'
SLEEP 4

FUNCTION LOGGER($logfil,$logdat)
 $result=0
 $n=0
 DO
  $result=Open(1, $logfil, 5)
  IF $result<>0
   IF $n=0
    ;First wait
    ?'Please wait'
   ELSE
    ;follow waits
    '.'
   ENDIF
   SLEEP 3
  ELSE
   $result=WriteLine(1, $logdat)
   $result=Close(1)
  ENDIF
  $n=$n+1
 UNTIL $result=0 OR $n=5
ENDFUNCTION

$oFSO=CreateObject("Scripting.FileSystemObject")
If @ERROR "ERROR creating FSO "+@ERROR+" "+@SERROR+@CRLF EndIf
 
$sDomain="MYDOMAIN"
$sGroup="SOME GROUP"
 
$oUsers=GetObject("WinNT://"+$sDomain+"/"+$sGroup+",group")
For Each $oUser in $oUsers.members
	$oUser.Name+":"+@CRLF
	For Each $sComputer in $oUser.LoginWorkstations
		"   " + $sComputer+@CRLF
	Next
Next

$oUser.LoginWorkstations=""
$oUser.SetInfo