DSolve[Log[Derivative[1][y][x]] + a*(-y[x] + x*Derivative[1][y][x]) == 0,y[x],x]