文件名称：AD域控操作案例
文件大小：3KB
文件格式：VBS
更新时间：2019-03-25 14:05:51
AD 域控 vbs
适合AD域控开发的入门参考 Const ADS_SCOPE_SUBTREE = 2 Const ADS_PROPERTY_CLEAR = 1 Set objRootDSE = GetObject("LDAP://rootDSE") strADsPath = "LDAP://" & objRootDSE.Get("defaultNamingContext") Set objDomain = GetObject(strADsPath) setRootOu(objDomain) '对根组织遍历 sub setRootOu(tmpobj)