Find brugergruppe i AD
Jeg er i gang med en HTA hvor jeg skal oprette en mængde brugereBrugerne oprettes ud fra en gruppe, så jeg skal først undersøge om gruppen eksistere.
hvis gruppe ikke findes, skal den oprettes, og der skal returneres en "true" værdi, så jeg kan se at gruppen er korrekt oprettet.
Gruppen oprettes på denne her måde
' ------ SCRIPT CONFIGURATION ------
strGroupParentDN = "<GroupParentDN>" ' e.g. ou=Groups,dc=rallencorp,dc=com
strGroupName = "<GroupName>" ' e.g. ExecAdminsSales
strGroupDescr = "<GroupDesc>" ' e.g. Executive Admins for Sales group
' ------ END CONFIGURATION ---------
' Constants taken from ADS_GROUP_TYPE_ENUM
Const ADS_GROUP_TYPE_DOMAIN_LOCAL_GROUP = 4
Const ADS_GROUP_TYPE_GLOBAL_GROUP = 2
Const ADS_GROUP_TYPE_LOCAL_GROUP = 4
Const ADS_GROUP_TYPE_SECURITY_ENABLED = -2147483648
Const ADS_GROUP_TYPE_UNIVERSAL_GROUP = 8
set objOU = GetObject("LDAP://" & strGroupParentDN)
set objGroup = objOU.Create("group","cn=" & strGroupName)
objGroup.Put "groupType", ADS_GROUP_TYPE_GLOBAL_GROUP _
Or ADS_GROUP_TYPE_SECURITY_ENABLED
objGroup.Put "samAccountName", strGroupName
objGroup.Put "description", strGroupDescr
objGroup.SetInfo
Håber at der er en der kan hjælpe mig med en god løsning
