fun[u_, v_] := {Cos[v] Sech[u], u - Tanh[u], Sech[u] Sin[v]}
tab = Catenate@Table[fun[u, v], {u, 0, 2, 0.1}, {v, 0, 2 Pi, 0.1}];
p = ParametricPlot3D[f[u, v], {u, 0, 2}, {v, 0, 2 Pi}, BoxRatios -> 1,
    Mesh -> None];
p3 = ListPointPlot3D[tab, BoxRatios -> 1];
sp = ListSurfacePlot3D[tab, Mesh -> None, BoxRatios -> 1];
spm = ListSurfacePlot3D[tab, Mesh -> None, BoxRatios -> 1,
   MaxPlotPoints -> 50];
Grid[{{"Plot3D", "ListPointPlot3D", "ListSurfacePlot3D",
   "ListSurfacePlot3D with MaxPLotPoints->50"}, {p, p3, sp, spm}}]