obtenir le type d' un objet Active Directory
Bonjour,
Sauriez vous comment je peut savoir si un un objet de l'AD est un group ou un utilisateur?
voici une partie de mon script:
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
| objCommand.CommandText = _
"SELECT * FROM 'LDAP://dc=maisonhugo,dc=no-ip,dc=org' WHERE objectCategory='group'"
Set objRecordSet = objCommand.Execute
objRecordSet.MoveFirst
Do Until objRecordSet.EOF
strADsPathGroup = objRecordSet.Fields("ADsPath").Value
Set objGroup = GetObject(strADsPathGroup)
if nom(1) = objGroup.sAMAccountName then
objExcel.Cells(lig, col).Font.Bold = TRUE
arrMemberOf = objGroup.GetEx("Member")
For Each strMemberOf in arrMemberOf
Set objMember = GetObject("LDAP://" & strMemberOf)
strMemberName = right(objMember.Name,len(objMember.Name)-3)
objExcel.Cells(lig, 4).Value = strMemberName
lig = lig + 1
Next
end if
objRecordSet.MoveNext
Loop |
si l'objet
Code:
objMember = GetObject("LDAP://" & strMemberOf)
est un groupe d'utilisateurs, je voudrai lister les utilisateurs qui sont dedans.
J'essaye pleins de truc mais je vois pas comment faire.
EDIT: en fait avec
Code:
if objMember.Category = "group" then
je pourrai m'en sortir mais le probleme c'est que quand l'objet n'est pas un groupe le script plante en indiquant ca:
Code:
1 2
| C:\script\test script list droits.vbs(126, 4) Microsoft VBScript runtime error:
Object doesn't support this property or method: 'objMember.Category' |
Merci de votre aide