>Any know how I can obtain a list of users on a Win 2000 system? I want
>to populate a combo.
>
>Thanks

In the Init of the Combo, you can have code to query a group you set up with all your users:

local logroup, louser, lxx
logroup = getobject('WinNT://MyDomain/MyMachine/MyGroup,group')
lxx = 1
for each louser in logroup.Members
	THIS.AddListItem(louser.Name, lxx)
	lxx = lxx + 1
endfor
THIS.ListIndex = 1
return .T.

If you don't have a group you can use the computer itself and check the Class property of the object in the FOR...ENDFOR loop:

local logroup, louser, lxx
logroup = getobject('WinNT://MyDomain/MyMachine,computer')
lxx = 1
for each louser in logroup
	if upper(louser.Class) = "USER" then
		THIS.AddListItem(louser.Name, lxx)
		lxx = lxx + 1
	endif
endfor
THIS.ListIndex = 1
return .T.

It will take longer because you will be cycling through services, users and groups.

HTH.