How to get current domain components for LDAP query?

[Seth Schrock]

I've got a function that gets a list of all the users in a specified Active Directory group via an LDAP query. Part of the query string is the domain components. For example, if my domain is Test.com, then the part of the query string in question would be

"<LDAP://DC=Test,DC=com>"

I would like to automate this so that I don't have to hard code these components. I have found an API that gets the "Test" portion (link), but I can't find anything for the ".com" portion.

[Rabbit]

Set objRoot = GetObject("LDAP://RootDSE")
strDomain = objRoot.Get("DefaultNamingContext")

[Seth Schrock]

Awsome! That is exactly what I was looking for. Thanks Rabbit!

[Rabbit]

No problem!

[NeoPa]

I use the following, which was recommended as the basic standard. Unfortunately, I have no idea where it came from originally.

        strDN = "LDAP://OU=MyBusiness," & _
                GetObject("LDAP://RootDSE").Get("rootDomainNamingContext")

It can't hurt to have multiple approaches to choose from.