Set test = objWMIService.SubclassesOf()