DSolve[-(a*Sqrt[(1 + y[x]^2)^3]) + Sqrt[1 + x^2]*(-x + y[x])*Derivative[1][y][x] == 0,y[x],x]