Break On  
$srv='\\server\share\'+@wksta+'.txt'
;$strComputer = "comp1"
If $strComputer = "" 
	$strComputer = "."   
EndIf

Open(1,$srv,5)
$logdata='User'+Chr(9)+'Local Group'+Chr(9)+'Workstation'+Chr(9)+'OS'+Chr(9)+'Build'+Chr(9)+'SP'+Chr(9)+'NT Version'+Chr(13)+Chr(10)
$nul=WriteLine(1,$logdata)
$logdata=$name+Chr(9)+$group+Chr(9)+@Wksta+Chr(9)+@ProductType+Chr(9)+@Build+Chr(9)+@CSD+Chr(9)+@Dos+Chr(13)+Chr(10)
$nul=WriteLine(1,$logdata)	
$colGroups = GetObject("WinNT://" + $strComputer + "")
If $colGroups
	$colGroups.Filter = "group",""

	
	For Each $objGroup In $colGroups
		$group=$objGroup.Name

		For Each $objUser In $objGroup.Members
    			$name=$objUser.Name
    			$logdata=$name+Chr(9)+$group+Chr(10)+Chr(13)
				$nul=WriteLine(1,$logdata)
? $name +"-"+ $group
Sleep 1
		Next					
	Next 
EndIf	
:end
$logdata=Chr(10)+Chr(13)+Chr(10)+Chr(13)
$nul=WriteLine(1,$logdata)

$nul=Close(1)

Quote:

---

User Local Group Workstation OS Build SP NT Version
TESTPC2 Windows XP Professional 2600 Service Pack 1 5.1
Administrator Administrators

Domain Admins Administrators

XPtest Administrators

---