mySum[s_, a_, b_]:= Sum[  Sum[1./n p^(-n s),
                               {n, b}],
                           {p, Prime @ Range @ PrimePi @ a}]