Hej!
Jag behöver lista alla användare som finns i en lokal grupp på min dator. I den lokala gruppen ligger en global grupp som jag oxå vill ha alla användare från. De användare som jag har i min lokala grupp kommer upp helt korrekt i slingan men när den ska loopa igenom den globala så får jag inga träffar. Beror på?

<code>
Private Function fnLoopGroup(ByVal objGroup As Object, ByRef dt As DataTable) As DataTable
Dim objUserInfo As Object
For Each objUserInfo In objGroup.Members
Select Case objUserInfo.Class
Case "User"
Dim dr As DataRow = dt.NewRow
dr.Item(0) = objUserInfo.Name.ToString
dt.Rows.Add(dr)

Case "Group"
dt = fnLoopGroup(objUserInfo, dt)
End Select
Next
Return dt
End Function
</code>
Mvh
Peter

Beror nog på att du måste connecta till den globala gruppen, den ligger ju inte egentligen i din lokala grupp utan har en helt anna sökväg...

Behöver du adsi hjälpen finns den på www.tiru.se/help

Hoppas det går bra och skriv gärna hur du gjorde för det var ett tag sen jag höll på med adsi och då bara med iisgrejer faktiskt...

Hälsningar
Daniel

Tack så mycket för tipset! Tittade lite i hjälpfilen men blev inte så mycket visare.. :/

Connectar? När jag hämtar min lokala grupp använder jag
<code>
objGroup = GetObject("winnt://127.0.0.1/gruppnamn,grupp")
</code>

Den hittar ju den globala gruppen i min lokala men inte dess members..

Mvh
Peter