Here is a way:
f[t_, u_, r_] = {r (1 + Cos[(8 t)]) Cos[t], r (1 + Cos[8 t]) Sin[t],
u};
Show[ParametricPlot3D[f[t, u, 1], {t, 0, 2 Pi}, {u, 0, 1},
Mesh -> None, PlotStyle -> Opacity[.9], PlotPoints -> {40, 2}],
ParametricPlot3D[{f[t, 1, r], f[t, -1, r]}, {t, 0, 2 Pi}, {r, 0, 1},
Mesh -> None, PlotStyle -> Opacity[.9], PlotPoints -> {40, 2}]]