Set obj = CreateObject("Shell.Application") Set objFolder = obj.NameSpace( &h26 ) obj.Explore(objFolder.Self.Path & "\Common Files\System\ado" ) Set obj = Nothing