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