GetAllTrustedDomains () As Variant;
Description
Returns a list of all the trusted domains of the current
domain.
Example
Dim Trust As IdomainTrustManagement
Dim Domain As Variant
Dim TrustedDomains As Variant
'Get the interface.
Set Trust = GetObject ("NTDS://DomainName")
'Call the GetAllTrustedDomains method
TrustedDomains = Trust.GetAllTrustedDomains
For Each Domain In TrustedDomains
Debug.Print Domain
Next Domain
See Also