Every time I try the honey trees I only get a Combee, Cherubi, Wurmple or Burmy.
Its a rare chance you just have to keep trying. Saving in-front of the tree when you see it shaking wont work either you will always get the same pokemon.