strComputer = "MyServer" Set colGroups = GetObject("WinNT://" & strComputer & "") colGroups.Filter = Array("group") For Each objGroup In colGroups Wscript.Echo objGroup.Name For Each objUser in objGroup.Members Wscript.Echo vbTab & objUser.Name Next NextI tried to convert to the following VFP code, but get stuck with the line "colGroups.Filter = Array ("group")"
strComputer = "MyServer" colGroups = GetObject("WinNT://" + strComputer + "") colGroups.Filter = Array ("group") For Each objGroup In colGroups Wait Window NoWait objGroup.Name For Each objUser In objGroup.Members Wait Window NoWait objUser.Name Next Next Wait ClearHow should it be?