LDAP - Hvilke grupper?

Hej

Hvordan finder jeg ud af hvilke grupper en given person er i?

Ved hjælp af LDAP?

-----
DCServer = "MITDOMAIN"

Set objDSE = GetObject("LDAP://rootDSE")
defContext = objDSE.Get("defaultNamingContext")

Set objCon = CreateObject("ADODB.Connection")
Set objCmd = CreateObject("ADODB.Command")

objCon.ConnectionString = "Active Directory Provider"
objCon.Provider = "ADsDSOObject"

objCon.Properties("Encrypt Password") = True
objCon.Open

ADS_SCOPE_SUBTREE=2

objCmd.ActiveConnection = objCon
objCmd.Properties("Timeout") = 30 ' seconds
objCmd.Properties("Page Size") = 1000
objCmd.Properties("searchscope") = ADS_SCOPE_SUBTREE

strADsPath = "LDAP://" & DCServer & "/" & defContext


objCmd.CommandText = "SELECT cn from '" & strADsPath & "' WHERE sAMAccountName='" & "brugernavn" & "'"

set rsUser = objCmd.Execute

if not rsUser.EOF then

    Response.Write "Velkommen " & rsUser.Fields("cn")
   
end if
rsUser.Close
-----------------

Er der desuden smartere at bruge ADSI? (Det er jo ret nemt at trække grupperne ud via ADSI - men man har jo ikke helt så mange muligheder)

Tak ;)