If domain global group belongs to a foreigner domain i get no members.
Perhaps I will not be able cause I got not enaugh rights. So I start to search only for goupnames and a users in foreigner Domains and I get all Information.
Next step I start to search the member with the Windowsexplorer and I recive also all members of the foreigner domain global group.
I belong to the domain de.firma.com
The foreigner Domain us.firma.com
Expand|Select|Wrap|Line Numbers
- strPath = "GC://dc=firma,dc=com"
- strGroupName = groupName
- Try
- objADAM = New DirectoryEntry(strPath)
- objADAM.RefreshCache()
- Catch e As Exception
- MessageBox.Show("LDAP-Name unbekannt!", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
- Return
- End Try
- Try
- objSearchADAM = New DirectorySearcher(objADAM)
- ' Mögliche Werte für ObjectClass: Group; User, Printer, Computer etc.
- objSearchADAM.Filter = "(&(objectClass=*) (cn=" & strGroupName & "))"
- objSearchADAM.SearchScope = SearchScope.Subtree
- objSearchResults = objSearchADAM.FindAll()
- Catch e As Exception
- MessageBox.Show(e.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
- Return
- End Try
- ' List groups and members.
- Try
- If objSearchResults.Count > 0 Then
- Dim objResult As SearchResult
- For Each objResult In objSearchResults
- objGroupEntry = objResult.GetDirectoryEntry()
- Dim members As Object = objGroupEntry.Invoke("members", Nothing)
- For Each member As Object In CType(members, IEnumerable)
- ' Read Surename,Givenname and Department
- Dim strNTUsernameDetails As String = ActiveDirectoryUser.Exists(strNTUsername)
- If strNTUsernameDetails Is String.Empty Then
- groupEntries.Add(strNTUsername)
- Else
- groupEntries.Add(strNTUsernameDetails)
- strNTUsernameDetails = String.Empty
- End If
- Next member
- Next objResult