DSolve[Derivative[2][y][x] == -((Sec[x]*(2*x*Cos[x] - x*Sin[x])*y[x])/x^2) - (Sec[x]*(-2*x*Cos[x] + x^2*Sin[x])*Derivative[1][y][x])/x^2,y[x],x]