DSolve[Derivative[1][y][x] == (8 - 4*a*x - 2*a*b*x^2 - a^2*x^3 - 4*a*x*y[x])/(8 + 4*b*x + 2*a*x^2 + 8*y[x]),y[x],x]