Integrate[x Exp[x]/(1+Exp[x])^2,x]