Hi,

I have the following VB script, that I need to convert to VFP:

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
Next

I 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 Clear

How should it be?

TIA,

Fernando