Set objRoot = GetObject («LDAP://RootDSE»)
Set objSchema = GetObject («LDAP://»& objRoot.Get _
	(«schemaNamingContext»))